BlitzCoder Code Database

BlitzCoder Essentials

•Home Page
•About BlitzCoder
•Contributors
•Terms of Use
•Email Us

Main Areas

•BlitzCoder Chat
•Discussions
•Articles/Tutorials
•Code Database
•Link Database
•Showcase Area
•Worklogs
•Competitions

Special Areas

•Undocumented

Other Blitz Sites

•Blitz Basic Home
•Blitz Showcase
•BlitzPlay Library

BlitzCoder Code Archives Page

Main Codes Page

"Scariest routine", by grim_1_2_3

This is just something I'm posting for fun. It is the routine which checks for a check status in a chess game I started writing a long time ago. It is 5,502 lines...!! This is one single function.

Code

Function find_wcheck()
If h_1 = 4 Then
If g_1 = 17 Or g_1 = 21 Then
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And g_1 = 0 Then
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And g_1 = 0 And f_1 = 0 Then
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And g_1 = 0 And f_1 = 0 And e_1 = 0 Then
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And g_1 = 0 And f_1 = 0 And e_1 = 0 And d_1 = 0 Then
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And g_1 = 0 And f_1 = 0 And e_1 = 0 And d_1 = 0 And c_1 = 0 Then
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And g_1 = 0 And f_1 = 0 And e_1 = 0 And d_1 = 0 And c_1 = 0 And b_1 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_1
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 Or g_2 = 25 Then
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 And g_2 = 0 Then
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And g_2 = 0 And f_3 = 0 Then
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And g_2 = 0 And f_3 = 0 And e_4 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 And g_2 = 0 And f_3 = 0 And e_4 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 And g_2 = 0 And f_3 = 0 And e_4 = 0 And d_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 19 Or a_8 = 21 And g_2 = 0 And f_3 = 0 And e_4 = 0 And d_5 = 0 And c_6 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid h_1
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 Then
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And h_2 = 0 Then
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And h_2 = 0 And h_3 = 0 Then
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And h_2 = 0 And h_3 = 0 And h_4 = 0 Then
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And h_2 = 0 And h_3 = 0 And h_4 = 0 And h_5 = 0 Then
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And h_2 = 0 And h_3 = 0 And h_4 = 0 And h_5 = 0 And h_6 = 0 Then
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And h_2 = 0 And h_3 = 0 And h_4 = 0 And h_5 = 0 And h_6 = 0 And h_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid h_1
wkingcheck = 1
EndIf
If f_2 = 18 Then
wkingcheck = 1
EndIf
If g_3 = 18 Then ; these two lines check the knight positions for a check status for the White King on grid h_1.
wkingcheck = 1
EndIf
EndIf
If h_2 = 4 Then
If h_1 = 17 Or h_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid h_2
wkingcheck = 1
EndIf
If g_1 = 19 Or g_1 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid h_2
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 Then
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And g_2 = 0 Then
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And g_2 = 0 And f_2 = 0 Then
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And g_2 = 0 And f_2 = 0 And e_2 = 0 Then
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And g_2 = 0 And f_2 = 0 And e_2 = 0 And d_2 = 0 Then
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And g_2 = 0 And f_2 = 0 And e_2 = 0 And d_2 = 0 And c_2 = 0 Then
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And g_2 = 0 And f_2 = 0 And e_2 = 0 And d_2 = 0 And c_2 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_2
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 Or g_3 = 25 Then
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 And g_3 = 0 Then
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And g_3 = 0 And f_4 = 0 Then
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 And g_3 = 0 And f_4 = 0 And e_5 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 And g_3 = 0 And f_4 = 0 And e_5 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 19 Or b_8 = 21 And g_3 = 0 And f_4 = 0 And e_5 = 0 And d_6 = 0 And c_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid h_2
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 Then
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And h_3 = 0 Then
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And h_3 = 0 And h_4 = 0 Then
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And h_3 = 0 And h_4 = 0 And h_5 = 0 Then
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And h_3 = 0 And h_4 = 0 And h_5 = 0 And h_6 = 0 Then
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And h_3 = 0 And h_4 = 0 And h_5 = 0 And h_6 = 0 And h_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid h_2
wkingcheck = 1
EndIf
If f_1 = 18 Then
wkingcheck = 1
EndIf
If f_3 = 18 Then
wkingcheck = 1
EndIf
If g_4 = 18 Then ; these two lines check the knight positions for a check status for the White King on grid h_2.
wkingcheck = 1
EndIf
EndIf
If h_3 = 4 Then
If h_2 = 17 Or h_2 = 21 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And h_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid h_3
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 Then 
wkingcheck = 1
EndIf
If f_1 = 19 Or f_1 = 21 And g_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid h_3
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 Then
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And g_3 = 0 Then
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And g_3 = 0 And f_3 = 0 Then
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And g_3 = 0 And f_3 = 0 And e_3 = 0 Then
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And g_3 = 0 And f_3 = 0 And e_3 = 0 And d_3 = 0 Then
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And g_3 = 0 And f_3 = 0 And e_3 = 0 And d_3 = 0 And c_3 = 0 Then
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And g_3 = 0 And f_3 = 0 And e_3 = 0 And d_3 = 0 And c_3 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_3
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 Or g_4 = 25 Then
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 And g_4 = 0 Then
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 And g_4 = 0 And f_5 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 And g_4 = 0 And f_5 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 19 Or c_8 = 21 And g_4 = 0 And f_5 = 0 And e_6 = 0 And d_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid h_3
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 Then
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And h_4 = 0 Then
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And h_4 = 0 And h_5 = 0 Then
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And h_4 = 0 And h_5 = 0 And h_6 = 0 Then
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And h_4 = 0 And h_5 = 0 And h_6 = 0 And h_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid h_3
wkingcheck = 1
EndIf
If g_1 = 18 Then
wkingcheck = 1
EndIf
If f_2 = 18 Then
wkingcheck = 1
EndIf
If f_4 = 18 Then 
wkingcheck = 1
EndIf
If g_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid h_3.
wkingcheck = 1
EndIf
EndIf
If h_4 = 4 Then
If h_3 = 17 Or h_3 = 21 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And h_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And h_3 = 0 And h_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid h_4
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 Then 
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 And g_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 19 Or e_1 = 21 And g_3 = 0 And f_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid h_4
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 Then
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And g_4 = 0 Then
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And g_4 = 0 And f_4 = 0 Then
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And g_4 = 0 And f_4 = 0 And e_4 = 0 Then
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And g_4 = 0 And f_4 = 0 And e_4 = 0 And d_4 = 0 Then
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And g_4 = 0 And f_4 = 0 And e_4 = 0 And d_4 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And g_4 = 0 And f_4 = 0 And e_4 = 0 And d_4 = 0 And c_4 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_4
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 Or g_5 = 25 Then
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 And g_5 = 0 Then
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 And g_5 = 0 And f_6 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 19 Or d_8 = 21 And g_5 = 0 And f_6 = 0 And e_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid h_4
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 Then
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And h_5 = 0 Then
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And h_5 = 0 And h_6 = 0 Then
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And h_5 = 0 And h_6 = 0 And h_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid h_4
wkingcheck = 1
EndIf
If g_2 = 18 Then
wkingcheck = 1
EndIf
If f_3 = 18 Then
wkingcheck = 1
EndIf
If f_5 = 18 Then 
wkingcheck = 1
EndIf
If g_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid h_4.
wkingcheck = 1
EndIf
EndIf
If h_5 = 4 Then
If h_4 = 17 Or h_4 = 21 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And h_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And h_4 = 0 And h_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And h_4 = 0 And h_3 = 0 And h_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid h_5
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 Then 
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 And g_4 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 And g_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 19 Or d_1 = 21 And g_4 = 0 And f_3 = 0 And e_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid h_5
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 Then
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And g_5 = 0 Then
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And g_5 = 0 And f_5 = 0 Then
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And g_5 = 0 And f_5 = 0 And e_5 = 0 Then
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And g_5 = 0 And f_5 = 0 And e_5 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And g_5 = 0 And f_5 = 0 And e_5 = 0 And d_5 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And g_5 = 0 And f_5 = 0 And e_5 = 0 And d_5 = 0 And c_5 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_5
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 Or g_6 = 25 Then
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 And g_6 = 0 Then
wkingcheck = 1
EndIf
If e_8 = 19 Or e_8 = 21 And g_6 = 0 And f_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid h_5
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 Then
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And h_6 = 0 Then
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And h_6 = 0 And h_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid h_5
wkingcheck = 1
EndIf
If g_3 = 18 Then
wkingcheck = 1
EndIf
If f_4 = 18 Then
wkingcheck = 1
EndIf
If f_6 = 18 Then 
wkingcheck = 1
EndIf
If g_7 = 18 Then ; these lines check the knight positions for a check status for the White King on grid h_5.
wkingcheck = 1
EndIf
EndIf
If h_6 = 4 Then
If h_5 = 17 Or h_5 = 21 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And h_5 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And h_5 = 0 And h_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And h_5 = 0 And h_4 = 0 And h_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And h_5 = 0 And h_4 = 0 And h_3 = 0 And h_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid h_6
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 Then 
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 And g_5 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 And g_5 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 And g_5 = 0 And f_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 19 Or c_1 = 21 And g_5 = 0 And f_4 = 0 And e_3 = 0 And d_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid h_6
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 Then
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And g_6 = 0 Then
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And g_6 = 0 And f_6 = 0 Then
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And g_6 = 0 And f_6 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And g_6 = 0 And f_6 = 0 And e_6 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And g_6 = 0 And f_6 = 0 And e_6 = 0 And d_6 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And g_6 = 0 And f_6 = 0 And e_6 = 0 And d_6 = 0 And c_6 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_6
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 Or g_7 = 25 Then
wkingcheck = 1
EndIf
If f_8 = 19 Or f_8 = 21 And g_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid h_6
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 Then
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And h_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid h_6
wkingcheck = 1
EndIf
If g_4 = 18 Then
wkingcheck = 1
EndIf
If f_5 = 18 Then
wkingcheck = 1
EndIf
If f_7 = 18 Then 
wkingcheck = 1
EndIf
If g_8 = 18 Then ; these lines check the knight positions for a check status for the White King on grid h_6.
wkingcheck = 1
EndIf
EndIf
If h_7 = 4 Then
If h_6 = 17 Or h_6 = 21 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And h_6 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And h_6 = 0 And h_5 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And h_6 = 0 And h_5 = 0 And h_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And h_6 = 0 And h_5 = 0 And h_4 = 0 And h_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And h_6 = 0 And h_5 = 0 And h_4 = 0 And h_3 = 0 And h_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid h_7
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 Then 
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 And g_6 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And g_6 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 And g_6 = 0 And f_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 And g_6 = 0 And f_5 = 0 And e_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 19 Or b_1 = 21 And g_6 = 0 And f_5 = 0 And e_4 = 0 And d_3 = 0 And c_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid h_7
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 Then
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And g_7 = 0 Then
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And g_7 = 0 And f_7 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And g_7 = 0 And f_7 = 0 And e_7 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And g_7 = 0 And f_7 = 0 And e_7 = 0 And d_7 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And g_7 = 0 And f_7 = 0 And e_7 = 0 And d_7 = 0 And c_7 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And g_7 = 0 And f_7 = 0 And e_7 = 0 And d_7 = 0 And c_7 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_7
wkingcheck = 1
EndIf
If g_8 = 19 Or g_8 = 21 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid h_7
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid h_7
wkingcheck = 1
EndIf
If g_5 = 18 Then
wkingcheck = 1
EndIf
If f_6 = 18 Then
wkingcheck = 1
EndIf
If f_8 = 18 Then ; these lines check the knight positions for a check status for the White King on grid h_7.
wkingcheck = 1
EndIf
EndIf
If h_8 = 4 Then
If h_7 = 17 Or h_7 = 21 Then 
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And h_7 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And h_7 = 0 And h_6 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And h_7 = 0 And h_6 = 0 And h_5 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And h_7 = 0 And h_6 = 0 And h_5 = 0 And h_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And h_7 = 0 And h_6 = 0 And h_5 = 0 And h_4 = 0 And h_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And h_7 = 0 And h_6 = 0 And h_5 = 0 And h_4 = 0 And h_3 = 0 And h_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid h_8
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 Then 
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 And g_7 = 0 Then 
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And g_7 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And g_7 = 0 And f_6 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 And g_7 = 0 And f_6 = 0 And e_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 And g_7 = 0 And f_6 = 0 And e_5 = 0 And d_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 19 Or a_1 = 21 And g_7 = 0 And f_6 = 0 And e_5 = 0 And d_4 = 0 And c_3 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid h_8
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 Then
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And g_8 = 0 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And g_8 = 0 And f_8 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And g_8 = 0 And f_8 = 0 And e_8 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And g_8 = 0 And f_8 = 0 And e_8 = 0 And d_8 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And g_8 = 0 And f_8 = 0 And e_8 = 0 And d_8 = 0 And c_8 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And g_8 = 0 And f_8 = 0 And e_8 = 0 And d_8 = 0 And c_8 = 0 And b_8 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid h_8
wkingcheck = 1
EndIf
If g_6 = 18 Then
wkingcheck = 1
EndIf
If f_7 = 18 Then ; these lines check the knight positions for a check status for the White King on grid h_8.
wkingcheck = 1
EndIf
EndIf
If g_1 = 4 Then
If f_1 = 17 Or f_1 = 21 Then
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And f_1 = 0 Then
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And f_1 = 0 And e_1 = 0 Then
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And f_1 = 0 And e_1 = 0 And d_1 = 0 Then
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And f_1 = 0 And e_1 = 0 And d_1 = 0 And c_1 = 0 Then
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And f_1 = 0 And e_1 = 0 And d_1 = 0 And c_1 = 0 And b_1 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_1
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 Or f_2 = 25 Then
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 And f_2 = 0 Then
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And f_2 = 0 And e_3 = 0 Then
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 And f_2 = 0 And e_3 = 0 And d_4 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 And f_2 = 0 And e_3 = 0 And d_4 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 19 Or a_7 = 21 And f_2 = 0 And e_3 = 0 And d_4 = 0 And c_5 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid g_1
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 Then
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And g_2 = 0 Then
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And g_2 = 0 And g_3 = 0 Then
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And g_2 = 0 And g_3 = 0 And g_4 = 0 Then
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And g_2 = 0 And g_3 = 0 And g_4 = 0 And g_5 = 0 Then
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And g_2 = 0 And g_3 = 0 And g_4 = 0 And g_5 = 0 And g_6 = 0 Then
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And g_2 = 0 And g_3 = 0 And g_4 = 0 And g_5 = 0 And g_6 = 0 And g_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid g_1
wkingcheck = 1
EndIf
If h_2 = 19 Or h_2 = 21 Or h_2 = 25 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid g_1
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_1
wkingcheck = 1
EndIf
If e_2 = 18 Then
wkingcheck = 1
EndIf
If f_3 = 18 Then 
wkingcheck = 1
EndIf
If h_3 = 18 Then ; these two lines check the knight positions for a check status for the White King on grid g_1.
wkingcheck = 1
EndIf
EndIf
If g_2 = 4 Then
If g_1 = 17 Or g_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid g_2
wkingcheck = 1
EndIf
If f_1 = 19 Or f_1 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid g_2
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 Then
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And f_2 = 0 Then
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And f_2 = 0 And e_2 = 0 Then
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And f_2 = 0 And e_2 = 0 And d_2 = 0 Then
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And f_2 = 0 And e_2 = 0 And d_2 = 0 And c_2 = 0 Then
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And f_2 = 0 And e_2 = 0 And d_2 = 0 And c_2 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_2
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 Or f_3 = 25 Then
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And f_3 = 0 Then
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And f_3 = 0 And e_4 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 And f_3 = 0 And e_4 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 And f_3 = 0 And e_4 = 0 And d_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 19 Or a_8 = 21 And f_3 = 0 And e_4 = 0 And d_5 = 0 And c_6 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid g_2
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 Then
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And g_3 = 0 Then
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And g_3 = 0 And g_4 = 0 Then
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And g_3 = 0 And g_4 = 0 And g_5 = 0 Then
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And g_3 = 0 And g_4 = 0 And g_5 = 0 And g_6 = 0 Then
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And g_3 = 0 And g_4 = 0 And g_5 = 0 And g_6 = 0 And g_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid g_2
wkingcheck = 1
EndIf
If h_3 = 19 Or h_3 = 21 Or h_3 = 25 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid g_2
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_2
wkingcheck = 1
EndIf
If h_1 = 19 Or h_1 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid g_2
wkingcheck = 1 
EndIf
If e_1 = 18 Then
wkingcheck = 1
EndIf
If e_3 = 18 Then
wkingcheck = 1
EndIf
If f_4 = 18 Then 
wkingcheck = 1
EndIf
If h_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid g_2.
wkingcheck = 1
EndIf
EndIf
If g_3 = 4 Then
If g_2 = 17 Or g_2 = 21 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And g_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 Then 
wkingcheck = 1
EndIf
If e_1 = 19 Or e_1 = 21 And f_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 Then
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And f_3 = 0 Then
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And f_3 = 0 And e_3 = 0 Then
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And f_3 = 0 And e_3 = 0 And d_3 = 0 Then
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And f_3 = 0 And e_3 = 0 And d_3 = 0 And c_3 = 0 Then
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And f_3 = 0 And e_3 = 0 And d_3 = 0 And c_3 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 Or f_4 = 25 Then
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And f_4 = 0 Then
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 And f_4 = 0 And e_5 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 And f_4 = 0 And e_5 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 19 Or b_8 = 21 And f_4 = 0 And e_5 = 0 And d_6 = 0 And c_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 Then
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And g_4 = 0 Then
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And g_4 = 0 And g_5 = 0 Then
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And g_4 = 0 And g_5 = 0 And g_6 = 0 Then
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And g_4 = 0 And g_5 = 0 And g_6 = 0 And g_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If h_4 = 19 Or h_4 = 21 Or h_4 = 25 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If h_2 = 19 Or h_2 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid g_3
wkingcheck = 1
EndIf
If f_1 = 18 Then
wkingcheck = 1
EndIf
If e_2 = 18 Then
wkingcheck = 1
EndIf
If e_4 = 18 Then 
wkingcheck = 1
EndIf
If f_5 = 18 Then 
wkingcheck = 1
EndIf
If h_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid g_3.
wkingcheck = 1
EndIf
EndIf
If g_4 = 4 Then
If g_3 = 17 Or g_3 = 21 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And g_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And g_3 = 0 And g_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 Then 
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 19 Or d_1 = 21 And f_3 = 0 And e_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 Then
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And f_4 = 0 Then
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And f_4 = 0 And e_4 = 0 Then
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And f_4 = 0 And e_4 = 0 And d_4 = 0 Then
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And f_4 = 0 And e_4 = 0 And d_4 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And f_4 = 0 And e_4 = 0 And d_4 = 0 And c_4 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 Or f_5 = 25 Then
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 And f_5 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 And f_5 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 19 Or c_8 = 21 And f_5 = 0 And e_6 = 0 And d_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 Then
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And g_5 = 0 Then
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And g_5 = 0 And g_6 = 0 Then
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And g_5 = 0 And g_6 = 0 And g_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If h_5 = 19 Or h_5 = 21 Or h_5 = 25 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If h_3 = 19 Or h_3 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid g_4
wkingcheck = 1
EndIf
If f_2 = 18 Then
wkingcheck = 1
EndIf
If e_3 = 18 Then
wkingcheck = 1
EndIf
If e_5 = 18 Then 
wkingcheck = 1
EndIf
If f_6 = 18 Then 
wkingcheck = 1
EndIf
If h_6 = 18 Then 
wkingcheck = 1
EndIf
If h_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid g_4.
wkingcheck = 1
EndIf
EndIf
If g_5 = 4 Then
If g_4 = 17 Or g_4 = 21 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And g_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And g_4 = 0 And g_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And g_4 = 0 And g_3 = 0 And g_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 Then 
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 And f_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 19 Or c_1 = 21 And f_4 = 0 And e_3 = 0 And d_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 Then
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And f_5 = 0 Then
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And f_5 = 0 And e_5 = 0 Then
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And f_5 = 0 And e_5 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And f_5 = 0 And e_5 = 0 And d_5 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And f_5 = 0 And e_5 = 0 And d_5 = 0 And c_5 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 Or f_6 = 25 Then
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 And f_6 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 19 Or d_8 = 21 And f_6 = 0 And e_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 Then
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And g_6 = 0 Then
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And g_6 = 0 And g_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If h_6 = 19 Or h_6 = 21 Or h_6 = 25 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If h_4 = 19 Or h_4 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid g_5
wkingcheck = 1
EndIf
If f_3 = 18 Then
wkingcheck = 1
EndIf
If e_4 = 18 Then
wkingcheck = 1
EndIf
If e_6 = 18 Then 
wkingcheck = 1
EndIf
If f_7 = 18 Then 
wkingcheck = 1
EndIf
If h_7 = 18 Then
wkingcheck = 1
EndIf
If h_3 = 18 Then ; these lines check the knight positions for a check status for the White King on grid g_5.
wkingcheck = 1
EndIf
EndIf
If g_6 = 4 Then
If g_5 = 17 Or g_5 = 21 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And g_5 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And g_5 = 0 And g_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And g_5 = 0 And g_4 = 0 And g_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And g_5 = 0 And g_4 = 0 And g_3 = 0 And g_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 Then 
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 And f_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 And f_5 = 0 And e_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 19 Or b_1 = 21 And f_5 = 0 And e_4 = 0 And d_3 = 0 And c_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 Then
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And f_6 = 0 Then
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And f_6 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And f_6 = 0 And e_6 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And f_6 = 0 And e_6 = 0 And d_6 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And f_6 = 0 And e_6 = 0 And d_6 = 0 And c_6 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 Or f_7 = 25 Then
wkingcheck = 1
EndIf
If e_8 = 19 Or e_8 = 21 And f_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 Then
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And g_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If h_7 = 19 Or h_7 = 21 Or h_7 = 25 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If h_5 = 19 Or h_5 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid g_6
wkingcheck = 1
EndIf
If f_4 = 18 Then
wkingcheck = 1
EndIf
If e_5 = 18 Then
wkingcheck = 1
EndIf
If e_7 = 18 Then 
wkingcheck = 1
EndIf
If f_8 = 18 Then 
wkingcheck = 1
EndIf
If h_8 = 18 Then
wkingcheck = 1
EndIf
If h_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid g_6.
wkingcheck = 1
EndIf
EndIf
If g_7 = 4 Then
If g_6 = 17 Or g_6 = 21 Then 
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And g_6 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And g_6 = 0 And g_5 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And g_6 = 0 And g_5 = 0 And g_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And g_6 = 0 And g_5 = 0 And g_4 = 0 And g_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And g_6 = 0 And g_5 = 0 And g_4 = 0 And g_3 = 0 And g_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 Then 
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And f_6 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 And f_6 = 0 And e_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 And f_6 = 0 And e_5 = 0 And d_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 19 Or a_1 = 21 And f_6 = 0 And e_5 = 0 And d_4 = 0 And c_3 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 Then
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And f_7 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And f_7 = 0 And e_7 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And f_7 = 0 And e_7 = 0 And d_7 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And f_7 = 0 And e_7 = 0 And d_7 = 0 And c_7 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And f_7 = 0 And e_7 = 0 And d_7 = 0 And c_7 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If f_8 = 19 Or f_8 = 21 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If h_8 = 19 Or h_8 = 21 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If h_6 = 19 Or h_6 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid g_7
wkingcheck = 1
EndIf
If f_5 = 18 Then
wkingcheck = 1
EndIf
If e_6 = 18 Then
wkingcheck = 1
EndIf
If e_8 = 18 Then 
wkingcheck = 1
EndIf
If h_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid g_7.
wkingcheck = 1
EndIf
EndIf
If g_8 = 4 Then
If g_7 = 17 Or g_7 = 21 Then 
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And g_7 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And g_7 = 0 And g_6 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And g_7 = 0 And g_6 = 0 And g_5 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And g_7 = 0 And g_6 = 0 And g_5 = 0 And g_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And g_7 = 0 And g_6 = 0 And g_5 = 0 And g_4 = 0 And g_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And g_7 = 0 And g_6 = 0 And g_5 = 0 And g_4 = 0 And g_3 = 0 And g_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid g_8
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 Then 
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And f_7 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 And f_7 = 0 And e_6 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 And f_7 = 0 And e_6 = 0 And d_5 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 19 Or a_2 = 21 And f_7 = 0 And e_6 = 0 And d_5 = 0 And c_4 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid g_8
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And f_8 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And f_8 = 0 And e_8 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And f_8 = 0 And e_8 = 0 And d_8 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And f_8 = 0 And e_8 = 0 And d_8 = 0 And c_8 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And f_8 = 0 And e_8 = 0 And d_8 = 0 And c_8 = 0 And b_8 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid g_8
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 Then ; This line from here checks the position to the right of the White king for 'check' status while on grid g_8
wkingcheck = 1
EndIf
If h_7 = 19 Or h_7 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid g_8
wkingcheck = 1
EndIf
If f_6 = 18 Then
wkingcheck = 1
EndIf
If e_7 = 18 Then 
wkingcheck = 1
EndIf
If h_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid g_8.
wkingcheck = 1
EndIf
EndIf
If f_1 = 4 Then
If e_1 = 17 Or e_1 = 21 Then
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And e_1 = 0 Then
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And e_1 = 0 And d_1 = 0 Then
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And e_1 = 0 And d_1 = 0 And c_1 = 0 Then
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And e_1 = 0 And d_1 = 0 And c_1 = 0 And b_1 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_1
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 Or e_2 = 25 Then
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 And e_2 = 0 Then
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 And e_2 = 0 And d_3 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 And e_2 = 0 And d_3 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 19 Or a_6 = 21 And e_2 = 0 And d_3 = 0 And c_4 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid f_1
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 Then
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And f_2 = 0 Then
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And f_2 = 0 And f_3 = 0 Then
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And f_2 = 0 And f_3 = 0 And f_4 = 0 Then
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And f_2 = 0 And f_3 = 0 And f_4 = 0 And f_5 = 0 Then
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And f_2 = 0 And f_3 = 0 And f_4 = 0 And f_5 = 0 And f_6 = 0 Then
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And f_2 = 0 And f_3 = 0 And f_4 = 0 And f_5 = 0 And f_6 = 0 And f_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid f_1
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 Or g_2 = 25 Then 
wkingcheck = 1
EndIf
If h_3 = 19 Or h_3 = 21 And g_2 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid f_1
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And g_1 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_1
wkingcheck = 1
EndIf
If d_2 = 18 Then
wkingcheck = 1
EndIf
If e_3 = 18 Then 
wkingcheck = 1
EndIf
If g_3 = 18 Then 
wkingcheck = 1
EndIf
If h_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_1.
wkingcheck = 1
EndIf
EndIf
If f_2 = 4 Then
If f_1 = 17 Or f_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid f_2
wkingcheck = 1
EndIf
If e_1 = 19 Or e_1 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid f_2
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 Then
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And e_2 = 0 Then
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And e_2 = 0 And d_2 = 0 Then
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And e_2 = 0 And d_2 = 0 And c_2 = 0 Then
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And e_2 = 0 And d_2 = 0 And c_2 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_2
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 Or e_3 = 25 Then
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And e_3 = 0 Then
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 And e_3 = 0 And d_4 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 And e_3 = 0 And d_4 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 19 Or a_7 = 21 And e_3 = 0 And d_4 = 0 And c_5 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid f_2
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 Then
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And f_3 = 0 Then
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And f_3 = 0 And f_4 = 0 Then
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And f_3 = 0 And f_4 = 0 And f_5 = 0 Then
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And f_3 = 0 And f_4 = 0 And f_5 = 0 And f_6 = 0 Then
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And f_3 = 0 And f_4 = 0 And f_5 = 0 And f_6 = 0 And f_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid f_2
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 Or g_3 = 25 Then 
wkingcheck = 1
EndIf
If h_4 = 19 Or h_4 = 21 And g_3 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid f_2
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And g_2 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_2
wkingcheck = 1
EndIf
If g_1 = 19 Or g_1 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid f_2
wkingcheck = 1 
EndIf
If d_1 = 18 Then
wkingcheck = 1
EndIf
If d_3 = 18 Then
wkingcheck = 1
EndIf
If e_4 = 18 Then 
wkingcheck = 1
EndIf
If g_4 = 18 Then 
wkingcheck = 1
EndIf
If h_3 = 18 Then
wkingcheck = 1
EndIf
If h_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_2.
wkingcheck = 1
EndIf
EndIf
If f_3 = 4 Then
If f_2 = 17 Or f_2 = 21 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And f_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 Then 
wkingcheck = 1
EndIf
If d_1 = 19 Or d_1 = 21 And e_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 Then
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And e_3 = 0 Then
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And e_3 = 0 And d_3 = 0 Then
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And e_3 = 0 And d_3 = 0 And c_3 = 0 Then
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And e_3 = 0 And d_3 = 0 And c_3 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 Or e_4 = 25 Then
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And e_4 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 And e_4 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 And e_4 = 0 And d_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 19 Or a_8 = 21 And e_4 = 0 And d_5 = 0 And c_6 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 Then
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And f_4 = 0 Then
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And f_4 = 0 And f_5 = 0 Then
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And f_4 = 0 And f_5 = 0 And f_6 = 0 Then
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And f_4 = 0 And f_5 = 0 And f_6 = 0 And f_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 Or g_4 = 25 Then 
wkingcheck = 1
EndIf
If h_5 = 19 Or h_5 = 21 And g_4 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And g_3 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 Then 
wkingcheck = 1
EndIf
If h_1 = 19 Or h_1 = 21 And g_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid f_3
wkingcheck = 1
EndIf
If e_1 = 18 Then
wkingcheck = 1
EndIf
If d_2 = 18 Then
wkingcheck = 1
EndIf
If d_4 = 18 Then 
wkingcheck = 1
EndIf
If e_5 = 18 Then 
wkingcheck = 1
EndIf
If g_5 = 18 Then 
wkingcheck = 1
EndIf
If h_4 = 18 Then
wkingcheck = 1
EndIf
If h_2 = 18 Then
wkingcheck = 1
EndIf
If g_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_3.
wkingcheck = 1
EndIf
EndIf
If f_4 = 4 Then
If f_3 = 17 Or f_3 = 21 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And f_3 = 0 And f_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 Then 
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 19 Or c_1 = 21 And e_3 = 0 And d_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 Then
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And e_4 = 0 Then
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And e_4 = 0 And d_4 = 0 Then
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And e_4 = 0 And d_4 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And e_4 = 0 And d_4 = 0 And c_4 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 Or e_5 = 25 Then
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 And e_5 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 And e_5 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 19 Or b_8 = 21 And e_5 = 0 And d_6 = 0 And c_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 Then
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And f_5 = 0 Then
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And f_5 = 0 And f_6 = 0 Then
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And f_5 = 0 And f_6 = 0 And f_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 Or g_5 = 25 Then 
wkingcheck = 1
EndIf
If h_6 = 19 Or h_6 = 21 And g_5 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And g_4 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 Then 
wkingcheck = 1
EndIf
If h_2 = 19 Or h_2 = 21 And g_3 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid f_4
wkingcheck = 1
EndIf
If e_2 = 18 Then
wkingcheck = 1
EndIf
If d_3 = 18 Then
wkingcheck = 1
EndIf
If d_5 = 18 Then 
wkingcheck = 1
EndIf
If e_6 = 18 Then 
wkingcheck = 1
EndIf
If g_6 = 18 Then 
wkingcheck = 1
EndIf
If h_5 = 18 Then 
wkingcheck = 1
EndIf
If h_3 = 18 Then
wkingcheck = 1
EndIf
If g_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_4.
wkingcheck = 1
EndIf
EndIf
If f_5 = 4 Then
If f_4 = 17 Or f_4 = 21 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And f_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And f_4 = 0 And f_3 = 0 And f_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 Then 
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 And e_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 19 Or b_1 = 21 And e_4 = 0 And d_3 = 0 And c_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 Then
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And e_5 = 0 Then
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And e_5 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And e_5 = 0 And d_5 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And e_5 = 0 And d_5 = 0 And c_5 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 Or e_6 = 25 Then
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 And e_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 19 Or c_8 = 21 And e_6 = 0 And d_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 Then
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And f_6 = 0 Then
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And f_6 = 0 And f_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 Or g_6 = 25 Then 
wkingcheck = 1
EndIf
If h_7 = 19 Or h_7 = 21 And g_6 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And g_5 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 Then 
wkingcheck = 1
EndIf
If h_3 = 19 Or h_3 = 21 And g_4 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid f_5
wkingcheck = 1
EndIf
If e_3 = 18 Then
wkingcheck = 1
EndIf
If d_4 = 18 Then
wkingcheck = 1
EndIf
If d_6 = 18 Then 
wkingcheck = 1
EndIf
If e_7 = 18 Then 
wkingcheck = 1
EndIf
If g_7 = 18 Then
wkingcheck = 1
EndIf
If h_6 = 18 Then 
wkingcheck = 1
EndIf
If h_4 = 18 Then
wkingcheck = 1
EndIf
If g_3 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_5.
wkingcheck = 1
EndIf
EndIf
If f_6 = 4 Then
If f_5 = 17 Or f_5 = 21 Then 
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And f_5 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And f_5 = 0 And f_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And f_5 = 0 And f_4 = 0 And f_3 = 0 And f_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 Then 
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 And e_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 And e_5 = 0 And d_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 19 Or a_1 = 21 And e_5 = 0 And d_4 = 0 And c_3 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 Then
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And e_6 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And e_6 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And e_6 = 0 And d_6 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And e_6 = 0 And d_6 = 0 And c_6 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 Or e_7 = 25 Then
wkingcheck = 1
EndIf
If d_8 = 19 Or d_8 = 21 And e_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 Then
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And f_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 Or g_7 = 25 Then 
wkingcheck = 1
EndIf
If h_8 = 19 Or h_8 = 21 And g_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 Then 
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And g_6 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 Then 
wkingcheck = 1
EndIf
If h_4 = 19 Or h_4 = 21 And g_5 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid f_6
wkingcheck = 1
EndIf
If e_4 = 18 Then
wkingcheck = 1
EndIf
If d_5 = 18 Then
wkingcheck = 1
EndIf
If d_7 = 18 Then 
wkingcheck = 1
EndIf
If e_8 = 18 Then 
wkingcheck = 1
EndIf
If g_8 = 18 Then
wkingcheck = 1
EndIf
If h_7 = 18 Then 
wkingcheck = 1
EndIf
If h_5 = 18 Then
wkingcheck = 1
EndIf
If g_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_6.
wkingcheck = 1
EndIf
EndIf
If f_7 = 4 Then
If f_6 = 17 Or f_6 = 21 Then 
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And f_6 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And f_6 = 0 And f_5 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And f_6 = 0 And f_5 = 0 And f_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And f_6 = 0 And f_5 = 0 And f_4 = 0 And f_3 = 0 And f_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 Then 
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 And e_6 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 And e_6 = 0 And d_5 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 19 Or a_2 = 21 And e_6 = 0 And d_5 = 0 And c_4 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And e_7 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And e_7 = 0 And d_7 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And e_7 = 0 And d_7 = 0 And c_7 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And e_7 = 0 And d_7 = 0 And c_7 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If e_8 = 19 Or e_8 = 21 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If g_8 = 19 Or g_8 = 21 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 Then 
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And g_7 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 Then 
wkingcheck = 1
EndIf
If h_5 = 19 Or h_5 = 21 And g_6 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid f_7
wkingcheck = 1
EndIf
If e_5 = 18 Then
wkingcheck = 1
EndIf
If d_6 = 18 Then
wkingcheck = 1
EndIf
If d_8 = 18 Then 
wkingcheck = 1
EndIf
If h_8 = 18 Then 
wkingcheck = 1
EndIf
If h_6 = 18 Then
wkingcheck = 1
EndIf
If g_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_7.
wkingcheck = 1
EndIf
EndIf
If f_8 = 4 Then
If f_7 = 17 Or f_7 = 21 Then 
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And f_7 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And f_7 = 0 And f_6 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And f_7 = 0 And f_6 = 0 And f_5 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And f_7 = 0 And f_6 = 0 And f_5 = 0 And f_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And f_7 = 0 And f_6 = 0 And f_5 = 0 And f_4 = 0 And f_3 = 0 And f_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid f_8
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 Then 
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 And e_7 = 0 Then 
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 And e_7 = 0 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 And e_7 = 0 And d_6 = 0 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If a_3 = 19 Or a_3 = 21 And e_7 = 0 And d_6 = 0 And c_5 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid f_8
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And e_8 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And e_8 = 0 And d_8 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And e_8 = 0 And d_8 = 0 And c_8 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And e_8 = 0 And d_8 = 0 And c_8 = 0 And b_8 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid f_8
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 Then 
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And g_8 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid f_8
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 Then 
wkingcheck = 1
EndIf
If h_6 = 19 Or h_6 = 21 And g_7 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid f_8
wkingcheck = 1
EndIf
If e_6 = 18 Then
wkingcheck = 1
EndIf
If d_7 = 18 Then 
wkingcheck = 1
EndIf
If h_7 = 18 Then 
wkingcheck = 1
EndIf
If g_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid f_8.
wkingcheck = 1
EndIf
EndIf
If e_1 = 4 Then
If d_1 = 17 Or d_1 = 21 Then
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And d_1 = 0 Then
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And d_1 = 0 And c_1 = 0 Then
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And d_1 = 0 And c_1 = 0 And b_1 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_1
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 Or d_2 = 25 Then
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 And d_2 = 0 Then
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 And d_2 = 0 And c_3 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 19 Or a_5 = 21 And d_2 = 0 And c_3 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid e_1
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 Then
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And e_2 = 0 Then
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And e_2 = 0 And e_3 = 0 Then
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And e_2 = 0 And e_3 = 0 And e_4 = 0 Then
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And e_2 = 0 And e_3 = 0 And e_4 = 0 And e_5 = 0 Then
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And e_2 = 0 And e_3 = 0 And e_4 = 0 And e_5 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And e_2 = 0 And e_3 = 0 And e_4 = 0 And e_5 = 0 And e_6 = 0 And e_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid e_1
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 Or f_2 = 25 Then 
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 And f_2 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 19 Or h_4 = 21 And f_2 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid e_1
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And f_1 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And f_1 = 0 And g_1 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_1
wkingcheck = 1
EndIf
If c_2 = 18 Then
wkingcheck = 1
EndIf
If d_3 = 18 Then 
wkingcheck = 1
EndIf
If f_3 = 18 Then 
wkingcheck = 1
EndIf
If g_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_1.
wkingcheck = 1
EndIf
EndIf
If e_2 = 4 Then
If e_1 = 17 Or e_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid e_2
wkingcheck = 1
EndIf
If d_1 = 19 Or d_1 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid e_2
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 Then
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And d_2 = 0 Then
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And d_2 = 0 And c_2 = 0 Then
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And d_2 = 0 And c_2 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_2
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 Or d_3 = 25 Then
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 And d_3 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 And d_3 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 19 Or a_6 = 21 And d_3 = 0 And c_4 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid e_2
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 Then
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And e_3 = 0 Then
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And e_3 = 0 And e_4 = 0 Then
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And e_3 = 0 And e_4 = 0 And e_5 = 0 Then
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And e_3 = 0 And e_4 = 0 And e_5 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And e_3 = 0 And e_4 = 0 And e_5 = 0 And e_6 = 0 And e_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid e_2
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 Or f_3 = 25 Then 
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 19 Or h_5 = 21 And f_3 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid e_2
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And f_2 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And f_2 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_2
wkingcheck = 1
EndIf
If f_1 = 19 Or f_1 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid e_2
wkingcheck = 1 
EndIf
If c_1 = 18 Then
wkingcheck = 1
EndIf
If c_3 = 18 Then
wkingcheck = 1
EndIf
If d_4 = 18 Then 
wkingcheck = 1
EndIf
If f_4 = 18 Then 
wkingcheck = 1
EndIf
If g_3 = 18 Then
wkingcheck = 1
EndIf
If g_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_2.
wkingcheck = 1
EndIf
EndIf
If e_3 = 4 Then
If e_2 = 17 Or e_2 = 21 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And e_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 Then 
wkingcheck = 1
EndIf
If c_1 = 19 Or c_1 = 21 And d_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 Then
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And d_3 = 0 Then
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And d_3 = 0 And c_3 = 0 Then
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And d_3 = 0 And c_3 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 Or d_4 = 25 Then
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 And d_4 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 And d_4 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 19 Or a_7 = 21 And d_4 = 0 And c_5 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 Then
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And e_4 = 0 Then
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And e_4 = 0 And e_5 = 0 Then
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And e_4 = 0 And e_5 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And e_4 = 0 And e_5 = 0 And e_6 = 0 And e_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 Or f_4 = 25 Then 
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 19 Or h_6 = 21 And f_4 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And f_3 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 Then 
wkingcheck = 1
EndIf
If g_1 = 19 Or g_1 = 21 And f_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid e_3
wkingcheck = 1
EndIf
If d_1 = 18 Then
wkingcheck = 1
EndIf
If c_2 = 18 Then
wkingcheck = 1
EndIf
If c_4 = 18 Then 
wkingcheck = 1
EndIf
If d_5 = 18 Then 
wkingcheck = 1
EndIf
If f_5 = 18 Then 
wkingcheck = 1
EndIf
If g_4 = 18 Then
wkingcheck = 1
EndIf
If g_2 = 18 Then
wkingcheck = 1
EndIf
If f_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_3.
wkingcheck = 1
EndIf
EndIf
If e_4 = 4 Then
If e_3 = 17 Or e_3 = 21 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And e_3 = 0 And e_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 Then 
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 19 Or b_1 = 21 And d_3 = 0 And c_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 Then
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And d_4 = 0 Then
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And d_4 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And d_4 = 0 And c_4 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 Or d_5 = 25 Then
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 And d_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 19 Or a_8 = 21 And d_5 = 0 And c_6 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 Then
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And e_5 = 0 Then
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And e_5 = 0 And e_6 = 0 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And e_5 = 0 And e_6 = 0 And e_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 Or f_5 = 25 Then 
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 19 Or h_7 = 21 And f_5 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And f_4 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 Then 
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 19 Or h_1 = 21 And f_3 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid e_4
wkingcheck = 1
EndIf
If d_2 = 18 Then
wkingcheck = 1
EndIf
If c_3 = 18 Then
wkingcheck = 1
EndIf
If c_5 = 18 Then 
wkingcheck = 1
EndIf
If d_6 = 18 Then 
wkingcheck = 1
EndIf
If f_6 = 18 Then 
wkingcheck = 1
EndIf
If g_5 = 18 Then 
wkingcheck = 1
EndIf
If g_3 = 18 Then
wkingcheck = 1
EndIf
If f_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_4.
wkingcheck = 1
EndIf
EndIf
If e_5 = 4 Then
If e_4 = 17 Or e_4 = 21 Then 
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And e_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And e_4 = 0 And e_3 = 0 And e_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 Then 
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 And d_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 19 Or a_1 = 21 And d_4 = 0 And c_3 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 Then
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And d_5 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And d_5 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And d_5 = 0 And c_5 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 Or d_6 = 25 Then
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 19 Or b_8 = 21 And d_6 = 0 And c_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 Then
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And e_6 = 0 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And e_6 = 0 And e_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 Or f_6 = 25 Then 
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 19 Or h_8 = 21 And f_6 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 Then 
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And f_5 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 Then 
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 19 Or h_2 = 21 And f_4 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid e_5
wkingcheck = 1
EndIf
If d_3 = 18 Then
wkingcheck = 1
EndIf
If c_4 = 18 Then
wkingcheck = 1
EndIf
If c_6 = 18 Then 
wkingcheck = 1
EndIf
If d_7 = 18 Then 
wkingcheck = 1
EndIf
If f_7 = 18 Then
wkingcheck = 1
EndIf
If g_6 = 18 Then 
wkingcheck = 1
EndIf
If g_4 = 18 Then
wkingcheck = 1
EndIf
If f_3 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_5.
wkingcheck = 1
EndIf
EndIf
If e_6 = 4 Then
If e_5 = 17 Or e_5 = 21 Then 
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And e_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And e_5 = 0 And e_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And e_5 = 0 And e_4 = 0 And e_3 = 0 And e_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 Then 
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 And d_5 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 19 Or a_2 = 21 And d_5 = 0 And c_4 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And d_6 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And d_6 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And d_6 = 0 And c_6 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 Or d_7 = 25 Then
wkingcheck = 1
EndIf
If c_8 = 19 Or c_8 = 21 And d_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 Then
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And e_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 Or f_7 = 25 Then 
wkingcheck = 1
EndIf
If g_8 = 19 Or g_8 = 21 And f_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 Then 
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And f_6 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 Then 
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 19 Or h_3 = 21 And f_5 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid e_6
wkingcheck = 1
EndIf
If d_4 = 18 Then
wkingcheck = 1
EndIf
If c_5 = 18 Then
wkingcheck = 1
EndIf
If c_7 = 18 Then 
wkingcheck = 1
EndIf
If d_8 = 18 Then 
wkingcheck = 1
EndIf
If f_8 = 18 Then
wkingcheck = 1
EndIf
If g_7 = 18 Then 
wkingcheck = 1
EndIf
If g_5 = 18 Then
wkingcheck = 1
EndIf
If f_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_6.
wkingcheck = 1
EndIf
EndIf
If e_7 = 4 Then
If e_6 = 17 Or e_6 = 21 Then 
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And e_6 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And e_6 = 0 And e_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And e_6 = 0 And e_5 = 0 And e_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And e_6 = 0 And e_5 = 0 And e_4 = 0 And e_3 = 0 And e_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 Then 
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 And d_6 = 0 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If a_3 = 19 Or a_3 = 21 And d_6 = 0 And c_5 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And d_7 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And d_7 = 0 And c_7 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And d_7 = 0 And c_7 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If d_8 = 19 Or d_8 = 21 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If f_8 = 19 Or f_8 = 21 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 Then 
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And f_7 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 Then 
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 19 Or h_4 = 21 And f_6 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid e_7
wkingcheck = 1
EndIf
If d_5 = 18 Then
wkingcheck = 1
EndIf
If c_6 = 18 Then
wkingcheck = 1
EndIf
If c_8 = 18 Then 
wkingcheck = 1
EndIf
If g_8 = 18 Then 
wkingcheck = 1
EndIf
If g_6 = 18 Then
wkingcheck = 1
EndIf
If f_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_7.
wkingcheck = 1
EndIf
EndIf
If e_8 = 4 Then
If e_7 = 17 Or e_7 = 21 Then 
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And e_7 = 0 Then 
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And e_7 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And e_7 = 0 And e_6 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And e_7 = 0 And e_6 = 0 And e_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And e_7 = 0 And e_6 = 0 And e_5 = 0 And e_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And e_7 = 0 And e_6 = 0 And e_5 = 0 And e_4 = 0 And e_3 = 0 And e_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid e_8
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 Then 
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 And d_7 = 0 Then 
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 And d_7 = 0 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If a_4 = 19 Or a_4 = 21 And d_7 = 0 And c_6 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid e_8
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And d_8 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And d_8 = 0 And c_8 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And d_8 = 0 And c_8 = 0 And b_8 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid e_8
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 Then 
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And f_8 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And f_8 = 0 And g_8 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid e_8
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 Then 
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 19 Or h_5 = 21 And f_7 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid e_8
wkingcheck = 1
EndIf
If d_6 = 18 Then
wkingcheck = 1
EndIf
If c_7 = 18 Then 
wkingcheck = 1
EndIf
If g_7 = 18 Then 
wkingcheck = 1
EndIf
If f_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid e_8.
wkingcheck = 1
EndIf
EndIf
If d_1 = 4 Then
If c_1 = 17 Or c_1 = 21 Then
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And c_1 = 0 Then
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And c_1 = 0 And b_1 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_1
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 Or c_2 = 25 Then
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 And c_2 = 0 Then
wkingcheck = 1
EndIf
If a_4 = 19 Or a_4 = 21 And c_2 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid d_1
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 Then
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And d_2 = 0 Then
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And d_2 = 0 And d_3 = 0 Then
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And d_2 = 0 And d_3 = 0 And d_4 = 0 Then
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And d_2 = 0 And d_3 = 0 And d_4 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And d_2 = 0 And d_3 = 0 And d_4 = 0 And d_5 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And d_2 = 0 And d_3 = 0 And d_4 = 0 And d_5 = 0 And d_6 = 0 And d_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid d_1
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 Or e_2 = 25 Then 
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 And e_2 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 And e_2 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 19 Or h_5 = 21 And e_2 = 0 And f_3 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid d_1
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And e_1 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And e_1 = 0 And f_1 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And e_1 = 0 And f_1 = 0 And g_1 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_1
wkingcheck = 1
EndIf
If b_2 = 18 Then
wkingcheck = 1
EndIf
If c_3 = 18 Then 
wkingcheck = 1
EndIf
If e_3 = 18 Then 
wkingcheck = 1
EndIf
If f_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_1.
wkingcheck = 1
EndIf
EndIf
If d_2 = 4 Then
If d_1 = 17 Or d_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid d_2
wkingcheck = 1
EndIf
If c_1 = 19 Or c_1 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid d_2
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 Then
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And c_2 = 0 Then
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And c_2 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_2
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 Or c_3 = 25 Then
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 And c_3 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 19 Or a_5 = 21 And c_3 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid d_2
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 Then
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And d_3 = 0 Then
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And d_3 = 0 And d_4 = 0 Then
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And d_3 = 0 And d_4 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And d_3 = 0 And d_4 = 0 And d_5 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And d_3 = 0 And d_4 = 0 And d_5 = 0 And d_6 = 0 And d_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid d_2
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 Or e_3 = 25 Then 
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 And e_3 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 19 Or h_6 = 21 And e_3 = 0 And f_4 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid d_2
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And e_2 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And e_2 = 0 And f_2 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And e_2 = 0 And f_2 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_2
wkingcheck = 1
EndIf
If e_1 = 19 Or e_1 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid d_2
wkingcheck = 1 
EndIf
If b_1 = 18 Then
wkingcheck = 1
EndIf
If b_3 = 18 Then
wkingcheck = 1
EndIf
If c_4 = 18 Then 
wkingcheck = 1
EndIf
If e_4 = 18 Then 
wkingcheck = 1
EndIf
If f_3 = 18 Then
wkingcheck = 1
EndIf
If f_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_2.
wkingcheck = 1
EndIf
EndIf
If d_3 = 4 Then
If d_2 = 17 Or d_2 = 21 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And d_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 Then 
wkingcheck = 1
EndIf
If b_1 = 19 Or b_1 = 21 And c_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 Then
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And c_3 = 0 Then
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And c_3 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 Or c_4 = 25 Then
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 19 Or a_6 = 21 And c_4 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 Then
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And d_4 = 0 Then
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And d_4 = 0 And d_5 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And d_4 = 0 And d_5 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And d_4 = 0 And d_5 = 0 And d_6 = 0 And d_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 Or e_4 = 25 Then 
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 And e_4 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 19 Or h_7 = 21 And e_4 = 0 And f_5 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And e_3 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And e_3 = 0 And f_3 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 Then 
wkingcheck = 1
EndIf
If f_1 = 19 Or f_1 = 21 And e_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid d_3
wkingcheck = 1
EndIf
If c_1 = 18 Then
wkingcheck = 1
EndIf
If b_2 = 18 Then
wkingcheck = 1
EndIf
If b_4 = 18 Then 
wkingcheck = 1
EndIf
If c_5 = 18 Then 
wkingcheck = 1
EndIf
If e_5 = 18 Then 
wkingcheck = 1
EndIf
If f_4 = 18 Then
wkingcheck = 1
EndIf
If f_2 = 18 Then
wkingcheck = 1
EndIf
If e_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_3.
wkingcheck = 1
EndIf
EndIf
If d_4 = 4 Then
If d_3 = 17 Or d_3 = 21 Then 
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And d_3 = 0 And d_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 Then 
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 19 Or a_1 = 21 And c_3 = 0 And b_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 Then
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And c_4 = 0 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And c_4 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 Or c_5 = 25 Then
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 19 Or a_7 = 21 And c_5 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 Then
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And d_5 = 0 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And d_5 = 0 And d_6 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And d_5 = 0 And d_6 = 0 And d_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 Or e_5 = 25 Then 
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 And e_5 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 19 Or h_8 = 21 And e_5 = 0 And f_6 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 Then 
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And e_4 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And e_4 = 0 And f_4 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 Then 
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 19 Or g_1 = 21 And e_3 = 0 And f_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid d_4
wkingcheck = 1
EndIf
If c_2 = 18 Then
wkingcheck = 1
EndIf
If b_3 = 18 Then
wkingcheck = 1
EndIf
If b_5 = 18 Then 
wkingcheck = 1
EndIf
If c_6 = 18 Then 
wkingcheck = 1
EndIf
If e_6 = 18 Then 
wkingcheck = 1
EndIf
If f_5 = 18 Then 
wkingcheck = 1
EndIf
If f_3 = 18 Then
wkingcheck = 1
EndIf
If e_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_4.
wkingcheck = 1
EndIf
EndIf
If d_5 = 4 Then
If d_4 = 17 Or d_4 = 21 Then 
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And d_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And d_4 = 0 And d_3 = 0 And d_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 Then 
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 19 Or a_2 = 21 And c_4 = 0 And b_3 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And c_5 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And c_5 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 Or c_6 = 25 Then
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 19 Or a_8 = 21 And c_6 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 Then
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And d_6 = 0 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And d_6 = 0 And d_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 Or e_6 = 25 Then 
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 19 Or g_8 = 21 And e_6 = 0 And f_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 Then 
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And e_5 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And e_5 = 0 And f_5 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 Then 
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 And e_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 19 Or h_1 = 21 And e_4 = 0 And f_3 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid d_5
wkingcheck = 1
EndIf
If c_3 = 18 Then
wkingcheck = 1
EndIf
If b_4 = 18 Then
wkingcheck = 1
EndIf
If b_6 = 18 Then 
wkingcheck = 1
EndIf
If c_7 = 18 Then 
wkingcheck = 1
EndIf
If e_7 = 18 Then
wkingcheck = 1
EndIf
If f_6 = 18 Then 
wkingcheck = 1
EndIf
If f_4 = 18 Then
wkingcheck = 1
EndIf
If e_3 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_5.
wkingcheck = 1
EndIf
EndIf
If d_6 = 4 Then
If d_5 = 17 Or d_5 = 21 Then 
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And d_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And d_5 = 0 And d_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And d_5 = 0 And d_4 = 0 And d_3 = 0 And d_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 Then 
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If a_3 = 19 Or a_3 = 21 And c_5 = 0 And b_4 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And c_6 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And c_6 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 Or c_7 = 25 Then
wkingcheck = 1
EndIf
If b_8 = 19 Or b_8 = 21 And c_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 Then
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And d_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 Or e_7 = 25 Then 
wkingcheck = 1
EndIf
If f_8 = 19 Or f_8 = 21 And e_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 Then 
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And e_6 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And e_6 = 0 And f_6 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 Then 
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 And e_5 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 19 Or h_2 = 21 And e_5 = 0 And f_4 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid d_6
wkingcheck = 1
EndIf
If c_4 = 18 Then
wkingcheck = 1
EndIf
If b_5 = 18 Then
wkingcheck = 1
EndIf
If b_7 = 18 Then 
wkingcheck = 1
EndIf
If c_8 = 18 Then 
wkingcheck = 1
EndIf
If e_8 = 18 Then
wkingcheck = 1
EndIf
If f_7 = 18 Then 
wkingcheck = 1
EndIf
If f_5 = 18 Then
wkingcheck = 1
EndIf
If e_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_6.
wkingcheck = 1
EndIf
EndIf
If d_7 = 4 Then
If d_6 = 17 Or d_6 = 21 Then 
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And d_6 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And d_6 = 0 And d_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And d_6 = 0 And d_5 = 0 And d_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And d_6 = 0 And d_5 = 0 And d_4 = 0 And d_3 = 0 And d_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 Then 
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If a_4 = 19 Or a_4 = 21 And c_6 = 0 And b_5 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And c_7 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And c_7 = 0 And b_7 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If c_8 = 19 Or c_8 = 21 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If e_8 = 19 Or e_8 = 21 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 Then 
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And e_7 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And e_7 = 0 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And e_7 = 0 And f_7 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 Then 
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 And e_6 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 19 Or h_3 = 21 And e_6 = 0 And f_5 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid d_7
wkingcheck = 1
EndIf
If c_5 = 18 Then
wkingcheck = 1
EndIf
If b_6 = 18 Then
wkingcheck = 1
EndIf
If b_8 = 18 Then 
wkingcheck = 1
EndIf
If f_8 = 18 Then 
wkingcheck = 1
EndIf
If f_6 = 18 Then
wkingcheck = 1
EndIf
If e_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_7.
wkingcheck = 1
EndIf
EndIf
If d_8 = 4 Then
If d_7 = 17 Or d_7 = 21 Then 
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And d_7 = 0 Then 
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And d_7 = 0 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And d_7 = 0 And d_6 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And d_7 = 0 And d_6 = 0 And d_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And d_7 = 0 And d_6 = 0 And d_5 = 0 And d_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And d_7 = 0 And d_6 = 0 And d_5 = 0 And d_4 = 0 And d_3 = 0 And d_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid d_8
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 Then 
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 And c_7 = 0 Then 
wkingcheck = 1
EndIf
If a_5 = 19 Or a_5 = 21 And c_7 = 0 And b_6 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid d_8
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And c_8 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And c_8 = 0 And b_8 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid d_8
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 Then 
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And e_8 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And e_8 = 0 And f_8 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And e_8 = 0 And f_8 = 0 And g_8 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid d_8
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 Then 
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 And e_7 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 And e_7 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 19 Or h_4 = 21 And e_7 = 0 And f_6 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid d_8
wkingcheck = 1
EndIf
If c_6 = 18 Then
wkingcheck = 1
EndIf
If b_7 = 18 Then 
wkingcheck = 1
EndIf
If f_7 = 18 Then 
wkingcheck = 1
EndIf
If e_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid d_8.
wkingcheck = 1
EndIf
EndIf
If c_1 = 4 Then
If b_1 = 17 Or b_1 = 21 Then
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And b_1 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_1
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 Or b_2 = 25 Then
wkingcheck = 1
EndIf
If a_3 = 19 Or a_3 = 21 And b_2 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid c_1
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 Then
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And c_2 = 0 Then
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And c_2 = 0 And c_3 = 0 Then
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And c_2 = 0 And c_3 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And c_2 = 0 And c_3 = 0 And c_4 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And c_2 = 0 And c_3 = 0 And c_4 = 0 And c_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And c_2 = 0 And c_3 = 0 And c_4 = 0 And c_5 = 0 And c_6 = 0 And c_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid c_1
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 Or d_2 = 25 Then 
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 And d_2 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 And d_2 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 19 Or g_5 = 21 And d_2 = 0 And e_3 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 19 Or h_6 = 21 And d_2 = 0 And e_3 = 0 And f_4 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid c_1
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And d_1 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And d_1 = 0 And e_1 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And d_1 = 0 And e_1 = 0 And f_1 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And d_1 = 0 And e_1 = 0 And f_1 = 0 And g_1 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_1
wkingcheck = 1
EndIf
If a_2 = 18 Then
wkingcheck = 1
EndIf
If b_3 = 18 Then 
wkingcheck = 1
EndIf
If d_3 = 18 Then 
wkingcheck = 1
EndIf
If e_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_1.
wkingcheck = 1
EndIf
EndIf
If c_2 = 4 Then
If c_1 = 17 Or c_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid c_2
wkingcheck = 1
EndIf
If b_1 = 19 Or b_1 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid c_2
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 Then
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And b_2 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_2
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 Or b_3 = 25 Then
wkingcheck = 1
EndIf
If a_4 = 19 Or a_4 = 21 And b_3 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid c_2
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 Then
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And c_3 = 0 Then
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And c_3 = 0 And c_4 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And c_3 = 0 And c_4 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And c_3 = 0 And c_4 = 0 And c_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And c_3 = 0 And c_4 = 0 And c_5 = 0 And c_6 = 0 And c_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid c_2
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 Or d_3 = 25 Then 
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 And d_3 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 And d_3 = 0 And e_4 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 19 Or h_7 = 21 And d_3 = 0 And e_4 = 0 And f_5 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid c_2
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And d_2 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And d_2 = 0 And e_2 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And d_2 = 0 And e_2 = 0 And f_2 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And d_2 = 0 And e_2 = 0 And f_2 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_2
wkingcheck = 1
EndIf
If d_1 = 19 Or d_1 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid c_2
wkingcheck = 1 
EndIf
If a_1 = 18 Then
wkingcheck = 1
EndIf
If a_3 = 18 Then
wkingcheck = 1
EndIf
If b_4 = 18 Then 
wkingcheck = 1
EndIf
If d_4 = 18 Then 
wkingcheck = 1
EndIf
If e_3 = 18 Then
wkingcheck = 1
EndIf
If e_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_2.
wkingcheck = 1
EndIf
EndIf
If c_3 = 4 Then
If c_2 = 17 Or c_2 = 21 Then 
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And c_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 Then 
wkingcheck = 1
EndIf
If a_1 = 19 Or a_1 = 21 And b_2 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 Then
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And b_3 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 Or b_4 = 25 Then
wkingcheck = 1
EndIf
If a_5 = 19 Or a_5 = 21 And b_4 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 Then
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And c_4 = 0 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And c_4 = 0 And c_5 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And c_4 = 0 And c_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And c_4 = 0 And c_5 = 0 And c_6 = 0 And c_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 Or d_4 = 25 Then 
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 And d_4 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 And d_4 = 0 And e_5 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 19 Or h_8 = 21 And d_4 = 0 And e_5 = 0 And f_6 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 Then 
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And d_3 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And d_3 = 0 And e_3 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And d_3 = 0 And e_3 = 0 And f_3 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 Then 
wkingcheck = 1
EndIf
If e_1 = 19 Or e_1 = 21 And d_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid c_3
wkingcheck = 1
EndIf
If b_1 = 18 Then
wkingcheck = 1
EndIf
If a_2 = 18 Then
wkingcheck = 1
EndIf
If a_4 = 18 Then 
wkingcheck = 1
EndIf
If b_5 = 18 Then 
wkingcheck = 1
EndIf
If d_5 = 18 Then 
wkingcheck = 1
EndIf
If e_4 = 18 Then
wkingcheck = 1
EndIf
If e_2 = 18 Then
wkingcheck = 1
EndIf
If d_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_3.
wkingcheck = 1
EndIf
EndIf
If c_4 = 4 Then
If c_3 = 17 Or c_3 = 21 Then 
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And c_3 = 0 And c_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 Then 
wkingcheck = 1
EndIf
If a_2 = 19 Or a_2 = 21 And b_3 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And b_4 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 Or b_5 = 25 Then
wkingcheck = 1
EndIf
If a_6 = 19 Or a_6 = 21 And b_5 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 Then
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And c_5 = 0 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And c_5 = 0 And c_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And c_5 = 0 And c_6 = 0 And c_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 Or d_5 = 25 Then 
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 And d_5 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 19 Or g_8 = 21 And d_5 = 0 And e_6 = 0 And f_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 Then 
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And d_4 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And d_4 = 0 And e_4 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And d_4 = 0 And e_4 = 0 And f_4 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 Then 
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 19 Or f_1 = 21 And d_3 = 0 And e_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid c_4
wkingcheck = 1
EndIf
If b_2 = 18 Then
wkingcheck = 1
EndIf
If a_3 = 18 Then
wkingcheck = 1
EndIf
If a_5 = 18 Then 
wkingcheck = 1
EndIf
If b_6 = 18 Then 
wkingcheck = 1
EndIf
If d_6 = 18 Then 
wkingcheck = 1
EndIf
If e_5 = 18 Then 
wkingcheck = 1
EndIf
If e_3 = 18 Then
wkingcheck = 1
EndIf
If d_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_4.
wkingcheck = 1
EndIf
EndIf
If c_5 = 4 Then
If c_4 = 17 Or c_4 = 21 Then 
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And c_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And c_4 = 0 And c_3 = 0 And c_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 Then 
wkingcheck = 1
EndIf
If a_3 = 19 Or a_3 = 21 And b_4 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And b_5 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 Or b_6 = 25 Then
wkingcheck = 1
EndIf
If a_7 = 19 Or a_7 = 21 And b_6 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 Then
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And c_6 = 0 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And c_6 = 0 And c_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 Or d_6 = 25 Then 
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_8 = 19 Or f_8 = 21 And d_6 = 0 And e_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 Then 
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And d_5 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And d_5 = 0 And e_5 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And d_5 = 0 And e_5 = 0 And f_5 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 Then 
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 And d_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 19 Or g_1 = 21 And d_4 = 0 And e_3 = 0 And f_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid c_5
wkingcheck = 1
EndIf
If b_3 = 18 Then
wkingcheck = 1
EndIf
If a_4 = 18 Then
wkingcheck = 1
EndIf
If a_6 = 18 Then 
wkingcheck = 1
EndIf
If b_7 = 18 Then 
wkingcheck = 1
EndIf
If d_7 = 18 Then
wkingcheck = 1
EndIf
If e_6 = 18 Then 
wkingcheck = 1
EndIf
If e_4 = 18 Then
wkingcheck = 1
EndIf
If d_3 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_5.
wkingcheck = 1
EndIf
EndIf
If c_6 = 4 Then
If c_5 = 17 Or c_5 = 21 Then 
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And c_5 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And c_5 = 0 And c_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And c_5 = 0 And c_4 = 0 And c_3 = 0 And c_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 Then 
wkingcheck = 1
EndIf
If a_4 = 19 Or a_4 = 21 And b_5 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And b_6 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 Or b_7 = 25 Then
wkingcheck = 1
EndIf
If a_8 = 19 Or a_8 = 21 And b_7 = 0 Then ; These lines from here check the positions to the left up diaganol of the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 Then
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And c_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 Or d_7 = 25 Then 
wkingcheck = 1
EndIf
If e_8 = 19 Or e_8 = 21 And d_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 Then 
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And d_6 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And d_6 = 0 And e_6 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And d_6 = 0 And e_6 = 0 And f_6 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 Then 
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 And d_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 And d_5 = 0 And e_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 19 Or h_1 = 21 And d_5 = 0 And e_4 = 0 And f_3 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid c_6
wkingcheck = 1
EndIf
If b_4 = 18 Then
wkingcheck = 1
EndIf
If a_5 = 18 Then
wkingcheck = 1
EndIf
If a_7 = 18 Then 
wkingcheck = 1
EndIf
If b_8 = 18 Then 
wkingcheck = 1
EndIf
If d_8 = 18 Then
wkingcheck = 1
EndIf
If e_7 = 18 Then 
wkingcheck = 1
EndIf
If e_5 = 18 Then
wkingcheck = 1
EndIf
If d_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_6.
wkingcheck = 1
EndIf
EndIf
If c_7 = 4 Then
If c_6 = 17 Or c_6 = 21 Then 
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And c_6 = 0 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And c_6 = 0 And c_5 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And c_6 = 0 And c_5 = 0 And c_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And c_6 = 0 And c_5 = 0 And c_4 = 0 And c_3 = 0 And c_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 Then 
wkingcheck = 1
EndIf
If a_5 = 19 Or a_5 = 21 And b_6 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And b_7 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If b_8 = 19 Or b_8 = 21 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If d_8 = 19 Or d_8 = 21 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 Then 
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And d_7 = 0 Then 
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And d_7 = 0 And e_7 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And d_7 = 0 And e_7 = 0 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And d_7 = 0 And e_7 = 0 And f_7 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 Then 
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 And d_6 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 And d_6 = 0 And e_5 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 19 Or h_2 = 21 And d_6 = 0 And e_5 = 0 And f_4 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid c_7
wkingcheck = 1
EndIf
If b_5 = 18 Then
wkingcheck = 1
EndIf
If a_6 = 18 Then
wkingcheck = 1
EndIf
If a_8 = 18 Then 
wkingcheck = 1
EndIf
If e_8 = 18 Then 
wkingcheck = 1
EndIf
If e_6 = 18 Then
wkingcheck = 1
EndIf
If d_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_7.
wkingcheck = 1
EndIf
EndIf
If c_8 = 4 Then
If c_7 = 17 Or c_7 = 21 Then 
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And c_7 = 0 Then 
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And c_7 = 0 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And c_7 = 0 And c_6 = 0 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And c_7 = 0 And c_6 = 0 And c_5 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And c_7 = 0 And c_6 = 0 And c_5 = 0 And c_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And c_7 = 0 And c_6 = 0 And c_5 = 0 And c_4 = 0 And c_3 = 0 And c_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid c_8
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 Then 
wkingcheck = 1
EndIf
If a_6 = 19 Or a_6 = 21 And b_7 = 0 Then ; These lines from here check the positions to the left down diaganol of the White king for 'check' status while on grid c_8
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And b_8 = 0 Then ; These lines from here check the positions to the left of the White king for 'check' status while on grid c_8
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 Then 
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And d_8 = 0 Then 
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And d_8 = 0 And e_8 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And d_8 = 0 And e_8 = 0 And f_8 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And d_8 = 0 And e_8 = 0 And f_8 = 0 And g_8 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid c_8
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 Then 
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 And d_7 = 0 Then 
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 And d_7 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 19 Or g_4 = 21 And d_7 = 0 And e_6 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 19 Or h_3 = 21 And d_7 = 0 And e_6 = 0 And f_5 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid c_8
wkingcheck = 1
EndIf
If b_6 = 18 Then
wkingcheck = 1
EndIf
If a_7 = 18 Then 
wkingcheck = 1
EndIf
If e_7 = 18 Then 
wkingcheck = 1
EndIf
If d_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid c_8.
wkingcheck = 1
EndIf
EndIf
If b_1 = 4 Then
If a_1 = 17 Or a_1 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_1
wkingcheck = 1
EndIf
If a_2 = 19 Or a_2 = 21 Or a_2 = 25 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid b_1
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 Then
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And b_2 = 0 Then
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And b_2 = 0 And b_3 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And b_2 = 0 And b_3 = 0 And b_4 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And b_2 = 0 And b_3 = 0 And b_4 = 0 And b_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And b_2 = 0 And b_3 = 0 And b_4 = 0 And b_5 = 0 And b_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And b_2 = 0 And b_3 = 0 And b_4 = 0 And b_5 = 0 And b_6 = 0 And b_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid b_1
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 Or c_2 = 25 Then 
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 And c_2 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And c_2 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_5 = 19 Or f_5 = 21 And c_2 = 0 And d_3 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_6 = 19 Or g_6 = 21 And c_2 = 0 And d_3 = 0 And e_4 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 19 Or h_7 = 21 And c_2 = 0 And d_3 = 0 And e_4 = 0 And f_5 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid b_1
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And c_1 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And c_1 = 0 And d_1 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And c_1 = 0 And d_1 = 0 And e_1 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And c_1 = 0 And d_1 = 0 And e_1 = 0 And f_1 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And c_1 = 0 And d_1 = 0 And e_1 = 0 And f_1 = 0 And g_1 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_1
wkingcheck = 1
EndIf
If a_3 = 18 Then
wkingcheck = 1
EndIf
If c_3 = 18 Then 
wkingcheck = 1
EndIf
If d_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_1.
wkingcheck = 1
EndIf
EndIf
If b_2 = 4 Then
If b_1 = 17 Or b_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid b_2
wkingcheck = 1
EndIf
If a_1 = 19 Or a_1 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid b_2
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_2
wkingcheck = 1
EndIf
If a_3 = 19 Or a_3 = 21 Or a_3 = 25 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid b_2
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 Then
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And b_3 = 0 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And b_3 = 0 And b_4 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And b_3 = 0 And b_4 = 0 And b_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And b_3 = 0 And b_4 = 0 And b_5 = 0 And b_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And b_3 = 0 And b_4 = 0 And b_5 = 0 And b_6 = 0 And b_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid b_2
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 Or c_3 = 25 Then 
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And c_3 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 And c_3 = 0 And d_4 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 And c_3 = 0 And d_4 = 0 And e_5 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 19 Or h_8 = 21 And c_3 = 0 And d_4 = 0 And e_5 = 0 And f_6 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid b_2
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 Then 
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And c_2 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And c_2 = 0 And d_2 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And c_2 = 0 And d_2 = 0 And e_2 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And c_2 = 0 And d_2 = 0 And e_2 = 0 And f_2 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And c_2 = 0 And d_2 = 0 And e_2 = 0 And f_2 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_2
wkingcheck = 1
EndIf
If c_1 = 19 Or c_1 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid b_2
wkingcheck = 1 
EndIf
If a_4 = 18 Then
wkingcheck = 1
EndIf
If c_4 = 18 Then
wkingcheck = 1
EndIf
If d_3 = 18 Then 
wkingcheck = 1
EndIf
If d_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_2.
wkingcheck = 1
EndIf
EndIf
If b_3 = 4 Then
If b_2 = 17 Or b_2 = 21 Then 
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And b_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If a_2 = 19 Or a_2 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If a_4 = 19 Or a_4 = 21 Or a_4 = 25 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 Then
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And b_4 = 0 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And b_4 = 0 And b_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And b_4 = 0 And b_5 = 0 And b_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And b_4 = 0 And b_5 = 0 And b_6 = 0 And b_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 Or c_4 = 25 Then 
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 And c_4 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 And c_4 = 0 And d_5 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 19 Or g_8 = 21 And c_4 = 0 And d_5 = 0 And e_6 = 0 And f_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 Then 
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And c_3 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And c_3 = 0 And d_3 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And c_3 = 0 And d_3 = 0 And e_3 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And c_3 = 0 And d_3 = 0 And e_3 = 0 And f_3 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 Then 
wkingcheck = 1
EndIf
If d_1 = 19 Or d_1 = 21 And c_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid b_3
wkingcheck = 1
EndIf
If a_1 = 18 Then
wkingcheck = 1
EndIf
If a_5 = 18 Then
wkingcheck = 1
EndIf
If c_5 = 18 Then 
wkingcheck = 1
EndIf
If d_4 = 18 Then 
wkingcheck = 1
EndIf
If d_2 = 18 Then 
wkingcheck = 1
EndIf
If c_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_3.
wkingcheck = 1
EndIf
EndIf
If b_4 = 4 Then
If b_3 = 17 Or b_3 = 21 Then 
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And b_3 = 0 And b_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If a_3 = 19 Or a_3 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If a_5 = 19 Or a_5 = 21 Or a_5 = 25 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 Then
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And b_5 = 0 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And b_5 = 0 And b_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And b_5 = 0 And b_6 = 0 And b_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 Or c_5 = 25 Then 
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 And c_5 = 0 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_8 = 19 Or f_8 = 21 And c_5 = 0 And d_6 = 0 And e_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 Then 
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And c_4 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And c_4 = 0 And d_4 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And c_4 = 0 And d_4 = 0 And e_4 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And c_4 = 0 And d_4 = 0 And e_4 = 0 And f_4 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 Then 
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 19 Or e_1 = 21 And c_3 = 0 And d_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid b_4
wkingcheck = 1
EndIf
If a_2 = 18 Then
wkingcheck = 1
EndIf
If a_6 = 18 Then
wkingcheck = 1
EndIf
If c_6 = 18 Then 
wkingcheck = 1
EndIf
If d_5 = 18 Then 
wkingcheck = 1
EndIf
If d_3 = 18 Then 
wkingcheck = 1
EndIf
If c_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_4.
wkingcheck = 1
EndIf
EndIf
If b_5 = 4 Then
If b_4 = 17 Or b_4 = 21 Then 
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And b_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And b_4 = 0 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And b_4 = 0 And b_3 = 0 And b_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If a_4 = 19 Or a_4 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If a_6 = 19 Or a_6 = 21 Or a_6 = 25 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 Then
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 And b_6 = 0 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And b_6 = 0 And b_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 Or c_6 = 25 Then 
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If e_8 = 19 Or e_8 = 21 And c_6 = 0 And d_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 Then 
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And c_5 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And c_5 = 0 And d_5 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And c_5 = 0 And d_5 = 0 And e_5 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And c_5 = 0 And d_5 = 0 And e_5 = 0 And f_5 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 Then 
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 And c_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 19 Or f_1 = 21 And c_4 = 0 And d_3 = 0 And e_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid b_5
wkingcheck = 1
EndIf
If a_3 = 18 Then
wkingcheck = 1
EndIf
If a_7 = 18 Then
wkingcheck = 1
EndIf
If c_7 = 18 Then 
wkingcheck = 1
EndIf
If d_6 = 18 Then 
wkingcheck = 1
EndIf
If d_4 = 18 Then
wkingcheck = 1
EndIf
If c_3 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_5.
wkingcheck = 1
EndIf
EndIf
If b_6 = 4 Then
If b_5 = 17 Or b_5 = 21 Then 
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And b_5 = 0 Then 
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And b_5 = 0 And b_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And b_5 = 0 And b_4 = 0 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And b_5 = 0 And b_4 = 0 And b_3 = 0 And b_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If a_5 = 19 Or a_5 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If a_7 = 19 Or a_7 = 21 Or a_7 = 25 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 Then
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 And b_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 Or c_7 = 25 Then 
wkingcheck = 1
EndIf
If d_8 = 19 Or d_8 = 21 And c_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 Then 
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And c_6 = 0 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And c_6 = 0 And d_6 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And c_6 = 0 And d_6 = 0 And e_6 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And c_6 = 0 And d_6 = 0 And e_6 = 0 And f_6 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 Then 
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 And c_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 And c_5 = 0 And d_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 19 Or g_1 = 21 And c_5 = 0 And d_4 = 0 And e_3 = 0 And f_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid b_6
wkingcheck = 1
EndIf
If a_4 = 18 Then
wkingcheck = 1
EndIf
If a_8 = 18 Then
wkingcheck = 1
EndIf
If c_8 = 18 Then 
wkingcheck = 1
EndIf
If d_7 = 18 Then 
wkingcheck = 1
EndIf
If d_5 = 18 Then
wkingcheck = 1
EndIf
If c_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_6.
wkingcheck = 1
EndIf
EndIf
If b_7 = 4 Then
If b_6 = 17 Or b_6 = 21 Then 
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And b_6 = 0 Then 
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And b_6 = 0 And b_5 = 0 Then 
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And b_6 = 0 And b_5 = 0 And b_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And b_6 = 0 And b_5 = 0 And b_4 = 0 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And b_6 = 0 And b_5 = 0 And b_4 = 0 And b_3 = 0 And b_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If a_6 = 19 Or a_6 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If a_8 = 19 Or a_8 = 21 Then ; This line from here checks the position to the left up diaganol of the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If c_8 = 19 Or c_8 = 21 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 Then 
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And c_7 = 0 Then 
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And c_7 = 0 And d_7 = 0 Then 
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And c_7 = 0 And d_7 = 0 And e_7 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And c_7 = 0 And d_7 = 0 And e_7 = 0 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And c_7 = 0 And d_7 = 0 And e_7 = 0 And f_7 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 Then 
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And c_6 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 And c_6 = 0 And d_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 And c_6 = 0 And d_5 = 0 And e_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 19 Or h_1 = 21 And c_6 = 0 And d_5 = 0 And e_4 = 0 And f_3 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid b_7
wkingcheck = 1
EndIf
If a_5 = 18 Then
wkingcheck = 1
EndIf
If d_8 = 18 Then
wkingcheck = 1
EndIf
If d_6 = 18 Then 
wkingcheck = 1
EndIf
If c_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_7.
wkingcheck = 1
EndIf
EndIf
If b_8 = 4 Then
If b_7 = 17 Or b_7 = 21 Then 
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 And b_7 = 0 Then 
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 And b_7 = 0 And b_6 = 0 Then 
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 And b_7 = 0 And b_6 = 0 And b_5 = 0 Then 
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 And b_7 = 0 And b_6 = 0 And b_5 = 0 And b_4 = 0 Then 
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 And b_7 = 0 And b_6 = 0 And b_5 = 0 And b_4 = 0 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 And b_7 = 0 And b_6 = 0 And b_5 = 0 And b_4 = 0 And b_3 = 0 And b_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid b_8
wkingcheck = 1
EndIf
If a_7 = 19 Or a_7 = 21 Then ; This line from here checks the position to the left down diaganol of the White king for 'check' status while on grid b_8
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 Then ; This line from here checks the position to the left of the White king for 'check' status while on grid b_8
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 Then 
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And c_8 = 0 Then 
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And c_8 = 0 And d_8 = 0 Then 
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And c_8 = 0 And d_8 = 0 And e_8 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And c_8 = 0 And d_8 = 0 And e_8 = 0 And f_8 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And c_8 = 0 And d_8 = 0 And e_8 = 0 And f_8 = 0 And g_8 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid b_8
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 Then 
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 And c_7 = 0 Then 
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And c_7 = 0 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 19 Or f_4 = 21 And c_7 = 0 And d_6 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 19 Or g_3 = 21 And c_7 = 0 And d_6 = 0 And e_5 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 19 Or h_2 = 21 And c_7 = 0 And d_6 = 0 And e_5 = 0 And f_4 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid b_8
wkingcheck = 1
EndIf
If a_6 = 18 Then
wkingcheck = 1
EndIf
If d_7 = 18 Then 
wkingcheck = 1
EndIf
If c_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid b_8.
wkingcheck = 1
EndIf
EndIf
If a_1 = 4 Then
If a_2 = 17 Or a_2 = 21 Then
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And a_2 = 0 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And a_2 = 0 And a_3 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And a_2 = 0 And a_3 = 0 And a_4 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And a_2 = 0 And a_3 = 0 And a_4 = 0 And a_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And a_2 = 0 And a_3 = 0 And a_4 = 0 And a_5 = 0 And a_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And a_2 = 0 And a_3 = 0 And a_4 = 0 And a_5 = 0 And a_6 = 0 And a_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid a_1
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 Or b_2 = 25 Then 
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 And b_2 = 0 Then 
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And b_2 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If e_5 = 19 Or e_5 = 21 And b_2 = 0 And c_3 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_6 = 19 Or f_6 = 21 And b_2 = 0 And c_3 = 0 And d_4 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 19 Or g_7 = 21 And b_2 = 0 And c_3 = 0 And d_4 = 0 And e_5 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 19 Or h_8 = 21 And b_2 = 0 And c_3 = 0 And d_4 = 0 And e_5 = 0 And f_6 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid a_1
wkingcheck = 1
EndIf
If b_1 = 17 Or b_1 = 21 Then 
wkingcheck = 1
EndIf
If c_1 = 17 Or c_1 = 21 And b_1 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 17 Or d_1 = 21 And b_1 = 0 And c_1 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 17 Or e_1 = 21 And b_1 = 0 And c_1 = 0 And d_1 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 17 Or f_1 = 21 And b_1 = 0 And c_1 = 0 And d_1 = 0 And e_1 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 17 Or g_1 = 21 And b_1 = 0 And c_1 = 0 And d_1 = 0 And e_1 = 0 And f_1 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 17 Or h_1 = 21 And b_1 = 0 And c_1 = 0 And d_1 = 0 And e_1 = 0 And f_1 = 0 And g_1 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_1
wkingcheck = 1
EndIf
If b_3 = 18 Then
wkingcheck = 1
EndIf
If c_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_1.
wkingcheck = 1
EndIf
EndIf
If a_2 = 4 Then
If a_1 = 17 Or a_1 = 21 Then ; This line from here checks the position straight down from the White king for 'check' status while on grid a_2
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 Then
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And a_3 = 0 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And a_3 = 0 And a_4 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And a_3 = 0 And a_4 = 0 And a_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And a_3 = 0 And a_4 = 0 And a_5 = 0 And a_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And a_3 = 0 And a_4 = 0 And a_5 = 0 And a_6 = 0 And a_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid a_2
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 Or b_3 = 25 Then 
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And b_3 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If e_6 = 19 Or e_6 = 21 And b_3 = 0 And c_4 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_7 = 19 Or f_7 = 21 And b_3 = 0 And c_4 = 0 And d_5 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 19 Or g_8 = 21 And b_3 = 0 And c_4 = 0 And d_5 = 0 And e_6 = 0 And f_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid a_2
wkingcheck = 1
EndIf
If b_2 = 17 Or b_2 = 21 Then 
wkingcheck = 1
EndIf
If c_2 = 17 Or c_2 = 21 And b_2 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 17 Or d_2 = 21 And b_2 = 0 And c_2 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 17 Or e_2 = 21 And b_2 = 0 And c_2 = 0 And d_2 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 17 Or f_2 = 21 And b_2 = 0 And c_2 = 0 And d_2 = 0 And e_2 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 17 Or g_2 = 21 And b_2 = 0 And c_2 = 0 And d_2 = 0 And e_2 = 0 And f_2 = 0 Then 
wkingcheck = 1
EndIf
If h_2 = 17 Or h_2 = 21 And b_2 = 0 And c_2 = 0 And d_2 = 0 And e_2 = 0 And f_2 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_2
wkingcheck = 1
EndIf
If b_1 = 19 Or b_1 = 21 Then ; This line from here checks the position to the right down diaganol of the White king for 'check' status while on grid a_2
wkingcheck = 1 
EndIf
If b_4 = 18 Then
wkingcheck = 1
EndIf
If c_3 = 18 Then
wkingcheck = 1
EndIf
If c_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_2.
wkingcheck = 1
EndIf
EndIf
If a_3 = 4 Then
If a_2 = 17 Or a_2 = 21 Then 
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And a_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid a_3
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 Then
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And a_4 = 0 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And a_4 = 0 And a_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And a_4 = 0 And a_5 = 0 And a_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And a_4 = 0 And a_5 = 0 And a_6 = 0 And a_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid a_3
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 Or b_4 = 25 Then 
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 And b_4 = 0 Then 
wkingcheck = 1
EndIf
If d_6 = 19 Or d_6 = 21 And b_4 = 0 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If e_7 = 19 Or e_7 = 21 And b_4 = 0 And c_5 = 0 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_8 = 19 Or f_8 = 21 And b_4 = 0 And c_5 = 0 And d_6 = 0 And e_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid a_3
wkingcheck = 1
EndIf
If b_3 = 17 Or b_3 = 21 Then 
wkingcheck = 1
EndIf
If c_3 = 17 Or c_3 = 21 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If d_3 = 17 Or d_3 = 21 And b_3 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 17 Or e_3 = 21 And b_3 = 0 And c_3 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 17 Or f_3 = 21 And b_3 = 0 And c_3 = 0 And d_3 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_3 = 17 Or g_3 = 21 And b_3 = 0 And c_3 = 0 And d_3 = 0 And e_3 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_3 = 17 Or h_3 = 21 And b_3 = 0 And c_3 = 0 And d_3 = 0 And e_3 = 0 And f_3 = 0 And g_3 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_3
wkingcheck = 1
EndIf
If b_2 = 19 Or b_2 = 21 Then 
wkingcheck = 1
EndIf
If c_1 = 19 Or c_1 = 21 And b_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid a_3
wkingcheck = 1
EndIf
If b_5 = 18 Then
wkingcheck = 1
EndIf
If c_4 = 18 Then
wkingcheck = 1
EndIf
If c_2 = 18 Then 
wkingcheck = 1
EndIf
If b_1 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_3.
wkingcheck = 1
EndIf
EndIf
If a_4 = 4 Then
If a_3 = 17 Or a_3 = 21 Then 
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And a_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And a_3 = 0 And a_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid a_4
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 Then
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And a_5 = 0 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And a_5 = 0 And a_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And a_5 = 0 And a_6 = 0 And a_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid a_4
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 Or b_5 = 25 Then 
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 And b_5 = 0 Then 
wkingcheck = 1
EndIf
If d_7 = 19 Or d_7 = 21 And b_5 = 0 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If e_8 = 19 Or e_8 = 21 And b_5 = 0 And c_6 = 0 And d_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid a_4
wkingcheck = 1
EndIf
If b_4 = 17 Or b_4 = 21 Then 
wkingcheck = 1
EndIf
If c_4 = 17 Or c_4 = 21 And b_4 = 0 Then 
wkingcheck = 1
EndIf
If d_4 = 17 Or d_4 = 21 And b_4 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 17 Or e_4 = 21 And b_4 = 0 And c_4 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_4 = 17 Or f_4 = 21 And b_4 = 0 And c_4 = 0 And d_4 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_4 = 17 Or g_4 = 21 And b_4 = 0 And c_4 = 0 And d_4 = 0 And e_4 = 0 And f_4 = 0 Then 
wkingcheck = 1
EndIf
If h_4 = 17 Or h_4 = 21 And b_4 = 0 And c_4 = 0 And d_4 = 0 And e_4 = 0 And f_4 = 0 And g_4 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_4
wkingcheck = 1
EndIf
If b_3 = 19 Or b_3 = 21 Then 
wkingcheck = 1
EndIf
If c_2 = 19 Or c_2 = 21 And b_3 = 0 Then 
wkingcheck = 1
EndIf
If d_1 = 19 Or d_1 = 21 And b_3 = 0 And c_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid a_4
wkingcheck = 1
EndIf
If b_6 = 18 Then
wkingcheck = 1
EndIf
If c_5 = 18 Then
wkingcheck = 1
EndIf
If c_3 = 18 Then 
wkingcheck = 1
EndIf
If b_2 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_4.
wkingcheck = 1
EndIf
EndIf
If a_5 = 4 Then
If a_4 = 17 Or a_4 = 21 Then 
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And a_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And a_4 = 0 And a_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And a_4 = 0 And a_3 = 0 And a_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid a_5
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 Then
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 And a_6 = 0 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And a_6 = 0 And a_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid a_5
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 Or b_6 = 25 Then 
wkingcheck = 1
EndIf
If c_7 = 19 Or c_7 = 21 And b_6 = 0 Then 
wkingcheck = 1
EndIf
If d_8 = 19 Or d_8 = 21 And b_6 = 0 And c_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid a_5
wkingcheck = 1
EndIf
If b_5 = 17 Or b_5 = 21 Then 
wkingcheck = 1
EndIf
If c_5 = 17 Or c_5 = 21 And b_5 = 0 Then 
wkingcheck = 1
EndIf
If d_5 = 17 Or d_5 = 21 And b_5 = 0 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If e_5 = 17 Or e_5 = 21 And b_5 = 0 And c_5 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_5 = 17 Or f_5 = 21 And b_5 = 0 And c_5 = 0 And d_5 = 0 And e_5 = 0 Then 
wkingcheck = 1
EndIf
If g_5 = 17 Or g_5 = 21 And b_5 = 0 And c_5 = 0 And d_5 = 0 And e_5 = 0 And f_5 = 0 Then 
wkingcheck = 1
EndIf
If h_5 = 17 Or h_5 = 21 And b_5 = 0 And c_5 = 0 And d_5 = 0 And e_5 = 0 And f_5 = 0 And g_5 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_5
wkingcheck = 1
EndIf
If b_4 = 19 Or b_4 = 21 Then 
wkingcheck = 1
EndIf
If c_3 = 19 Or c_3 = 21 And b_4 = 0 Then 
wkingcheck = 1
EndIf
If d_2 = 19 Or d_2 = 21 And b_4 = 0 And c_3 = 0 Then 
wkingcheck = 1
EndIf
If e_1 = 19 Or e_1 = 21 And b_4 = 0 And c_3 = 0 And d_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid a_5
wkingcheck = 1
EndIf
If b_7 = 18 Then
wkingcheck = 1
EndIf
If c_6 = 18 Then
wkingcheck = 1
EndIf
If c_4 = 18 Then 
wkingcheck = 1
EndIf
If b_3 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_5.
wkingcheck = 1
EndIf
EndIf
If a_6 = 4 Then
If a_5 = 17 Or a_5 = 21 Then 
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And a_5 = 0 Then 
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And a_5 = 0 And a_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And a_5 = 0 And a_4 = 0 And a_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And a_5 = 0 And a_4 = 0 And a_3 = 0 And a_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid a_6
wkingcheck = 1
EndIf
If a_7 = 17 Or a_7 = 21 Then
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 And a_7 = 0 Then ; These lines from here check the positions straight up from the White king for 'check' status while on grid a_6
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 Or b_7 = 25 Then 
wkingcheck = 1
EndIf
If c_8 = 19 Or c_8 = 21 And b_7 = 0 Then ; These lines from here check the positions to the right up diaganol of the White king for 'check' status while on grid a_6
wkingcheck = 1
EndIf
If b_6 = 17 Or b_6 = 21 Then 
wkingcheck = 1
EndIf
If c_6 = 17 Or c_6 = 21 And b_6 = 0 Then 
wkingcheck = 1
EndIf
If d_6 = 17 Or d_6 = 21 And b_6 = 0 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If e_6 = 17 Or e_6 = 21 And b_6 = 0 And c_6 = 0 And d_6 = 0 Then 
wkingcheck = 1
EndIf
If f_6 = 17 Or f_6 = 21 And b_6 = 0 And c_6 = 0 And d_6 = 0 And e_6 = 0 Then 
wkingcheck = 1
EndIf
If g_6 = 17 Or g_6 = 21 And b_6 = 0 And c_6 = 0 And d_6 = 0 And e_6 = 0 And f_6 = 0 Then 
wkingcheck = 1
EndIf
If h_6 = 17 Or h_6 = 21 And b_6 = 0 And c_6 = 0 And d_6 = 0 And e_6 = 0 And f_6 = 0 And g_6 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_6
wkingcheck = 1
EndIf
If b_5 = 19 Or b_5 = 21 Then 
wkingcheck = 1
EndIf
If c_4 = 19 Or c_4 = 21 And b_5 = 0 Then 
wkingcheck = 1
EndIf
If d_3 = 19 Or d_3 = 21 And b_5 = 0 And c_4 = 0 Then 
wkingcheck = 1
EndIf
If e_2 = 19 Or e_2 = 21 And b_5 = 0 And c_4 = 0 And d_3 = 0 Then 
wkingcheck = 1
EndIf
If f_1 = 19 Or f_1 = 21 And b_5 = 0 And c_4 = 0 And d_3 = 0 And e_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid a_6
wkingcheck = 1
EndIf
If b_8 = 18 Then
wkingcheck = 1
EndIf
If c_7 = 18 Then
wkingcheck = 1
EndIf
If c_5 = 18 Then 
wkingcheck = 1
EndIf
If b_4 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_6.
wkingcheck = 1
EndIf
EndIf
If a_7 = 4 Then
If a_6 = 17 Or a_6 = 21 Then 
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And a_6 = 0 Then 
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And a_6 = 0 And a_5 = 0 Then 
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And a_6 = 0 And a_5 = 0 And a_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And a_6 = 0 And a_5 = 0 And a_4 = 0 And a_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And a_6 = 0 And a_5 = 0 And a_4 = 0 And a_3 = 0 And a_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid a_7
wkingcheck = 1
EndIf
If a_8 = 17 Or a_8 = 21 Then ; This line from here checks the position straight up from the White king for 'check' status while on grid a_7
wkingcheck = 1
EndIf
If b_8 = 19 Or b_8 = 21 Then ; This line from here checks the position to the right up diaganol of the White king for 'check' status while on grid a_7
wkingcheck = 1
EndIf
If b_7 = 17 Or b_7 = 21 Then 
wkingcheck = 1
EndIf
If c_7 = 17 Or c_7 = 21 And b_7 = 0 Then 
wkingcheck = 1
EndIf
If d_7 = 17 Or d_7 = 21 And b_7 = 0 And c_7 = 0 Then 
wkingcheck = 1
EndIf
If e_7 = 17 Or e_7 = 21 And b_7 = 0 And c_7 = 0 And d_7 = 0 Then 
wkingcheck = 1
EndIf
If f_7 = 17 Or f_7 = 21 And b_7 = 0 And c_7 = 0 And d_7 = 0 And e_7 = 0 Then 
wkingcheck = 1
EndIf
If g_7 = 17 Or g_7 = 21 And b_7 = 0 And c_7 = 0 And d_7 = 0 And e_7 = 0 And f_7 = 0 Then 
wkingcheck = 1
EndIf
If h_7 = 17 Or h_7 = 21 And b_7 = 0 And c_7 = 0 And d_7 = 0 And e_7 = 0 And f_7 = 0 And g_7 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_7
wkingcheck = 1
EndIf
If b_6 = 19 Or b_6 = 21 Then 
wkingcheck = 1
EndIf
If c_5 = 19 Or c_5 = 21 And b_6 = 0 Then 
wkingcheck = 1
EndIf
If d_4 = 19 Or d_4 = 21 And b_6 = 0 And c_5 = 0 Then 
wkingcheck = 1
EndIf
If e_3 = 19 Or e_3 = 21 And b_6 = 0 And c_5 = 0 And d_4 = 0 Then 
wkingcheck = 1
EndIf
If f_2 = 19 Or f_2 = 21 And b_6 = 0 And c_5 = 0 And d_4 = 0 And e_3 = 0 Then 
wkingcheck = 1
EndIf
If g_1 = 19 Or g_1 = 21 And b_6 = 0 And c_5 = 0 And d_4 = 0 And e_3 = 0 And f_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid a_7
wkingcheck = 1
EndIf
If c_8 = 18 Then
wkingcheck = 1
EndIf
If c_6 = 18 Then
wkingcheck = 1
EndIf
If b_5 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_7.
wkingcheck = 1
EndIf
EndIf
If a_8 = 4 Then
If a_7 = 17 Or a_7 = 21 Then 
wkingcheck = 1
EndIf
If a_6 = 17 Or a_6 = 21 And a_7 = 0 Then 
wkingcheck = 1
EndIf
If a_5 = 17 Or a_5 = 21 And a_7 = 0 And a_6 = 0 Then 
wkingcheck = 1
EndIf
If a_4 = 17 Or a_4 = 21 And a_7 = 0 And a_6 = 0 And a_5 = 0 Then 
wkingcheck = 1
EndIf
If a_3 = 17 Or a_3 = 21 And a_7 = 0 And a_6 = 0 And a_5 = 0 And a_4 = 0 Then 
wkingcheck = 1
EndIf
If a_2 = 17 Or a_2 = 21 And a_7 = 0 And a_6 = 0 And a_5 = 0 And a_4 = 0 And a_3 = 0 Then 
wkingcheck = 1
EndIf
If a_1 = 17 Or a_1 = 21 And a_7 = 0 And a_6 = 0 And a_5 = 0 And a_4 = 0 And a_3 = 0 And a_2 = 0 Then ; These lines from here check the positions straight down from the White king for 'check' status while on grid a_8
wkingcheck = 1
EndIf
If b_8 = 17 Or b_8 = 21 Then 
wkingcheck = 1
EndIf
If c_8 = 17 Or c_8 = 21 And b_8 = 0 Then 
wkingcheck = 1
EndIf
If d_8 = 17 Or d_8 = 21 And b_8 = 0 And c_8 = 0 Then 
wkingcheck = 1
EndIf
If e_8 = 17 Or e_8 = 21 And b_8 = 0 And c_8 = 0 And d_8 = 0 Then 
wkingcheck = 1
EndIf
If f_8 = 17 Or f_8 = 21 And b_8 = 0 And c_8 = 0 And d_8 = 0 And e_8 = 0 Then 
wkingcheck = 1
EndIf
If g_8 = 17 Or g_8 = 21 And b_8 = 0 And c_8 = 0 And d_8 = 0 And e_8 = 0 And f_8 = 0 Then 
wkingcheck = 1
EndIf
If h_8 = 17 Or h_8 = 21 And b_8 = 0 And c_8 = 0 And d_8 = 0 And e_8 = 0 And f_8 = 0 And g_8 = 0 Then ; These lines from here check the positions to the right of the White king for 'check' status while on grid a_8
wkingcheck = 1
EndIf
If b_7 = 19 Or b_7 = 21 Then 
wkingcheck = 1
EndIf
If c_6 = 19 Or c_6 = 21 And b_7 = 0 Then 
wkingcheck = 1
EndIf
If d_5 = 19 Or d_5 = 21 And b_7 = 0 And c_6 = 0 Then 
wkingcheck = 1
EndIf
If e_4 = 19 Or e_4 = 21 And b_7 = 0 And c_6 = 0 And d_5 = 0 Then 
wkingcheck = 1
EndIf
If f_3 = 19 Or f_3 = 21 And b_7 = 0 And c_6 = 0 And d_5 = 0 And e_4 = 0 Then 
wkingcheck = 1
EndIf
If g_2 = 19 Or g_2 = 21 And b_7 = 0 And c_6 = 0 And d_5 = 0 And e_4 = 0 And f_3 = 0 Then 
wkingcheck = 1
EndIf
If h_1 = 19 Or h_1 = 21 And b_7 = 0 And c_6 = 0 And d_5 = 0 And e_4 = 0 And f_3 = 0 And g_2 = 0 Then ; These lines from here check the positions to the right down diaganol of the White king for 'check' status while on grid a_8
wkingcheck = 1
EndIf
If c_7 = 18 Then
wkingcheck = 1
EndIf
If b_6 = 18 Then ; these lines check the knight positions for a check status for the White King on grid a_8.
wkingcheck = 1
EndIf
EndIf
End Function

Code software created by Krylar's Kreations