DEFINE KEY GOLD 15 AS "(SHL)." ! GOLD <- DEFINE KEY GOLD 14 AS "(SHR)." ! GOLD -> DEFINE KEY GOLD . AS "(SEN)." DEFINE KEY GOLD P AS "(PAR)." DEFINE KEY GOLD T AS "TOP." SET SCREEN 80 SET WRAP 78 SET MODE CHANGE