Procedure WriteAscii(x,y,ascii,c) If x < 0 x = 0 EndIf If y < 0 y = 0 EndIf If x > 123 x = c23 EndIf If y > 58 y = 58 EndIf Select ascii Case 'a' Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+4,y+6) = c Display(x+4,y+5) = c Display(x+4,y+4) = c Display(x+4,y+3) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+0,y+2) = c Display(x+1,y+1) = c Display(x+2,y+0) = c Display(x+3,y+1) = c Display(x+4,y+2) = c Case 'b' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Case 'c' Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+1) = c Display(x+4,y+5) = c Case 'd' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Case 'e' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+4,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+6) = c Case 'f' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+4,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Case 'g' Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Case 'h' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+4,y+6) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Case 'i' Display(x+2,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+2,y+6) = c Display(x+1,y+0) = c Display(x+3,y+0) = c Display(x+1,y+6) = c Display(x+3,y+6) = c Case 'j' Display(x+0,y+0) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+0,y+5) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Case 'k' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+4,y+0) = c Display(x+3,y+1) = c Display(x+2,y+2) = c Display(x+1,y+3) = c Display(x+2,y+4) = c Display(x+3,y+5) = c Display(x+4,y+6) = c Case 'l' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+6) = c Case 'm' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+4,y+6) = c Display(x+1,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+3,y+1) = c Case 'n' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+4,y+6) = c Display(x+1,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+3,y+5) = c Case 'o' Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Case 'p' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Case 'q' Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+3,y+5) = c Display(x+2,y+4) = c Case 'r' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+6) = c Display(x+3,y+5) = c Display(x+2,y+4) = c Case 's' Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+5) = c Display(x+4,y+1) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Case 't' Display(x+2,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+2,y+6) = c Display(x+0,y+0) = c Display(x+1,y+0) = c Display(x+3,y+0) = c Display(x+4,y+0) = c Case 'u' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Case 'v' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+1,y+5) = c Display(x+2,y+6) = c Display(x+3,y+5) = c Case 'w' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+1,y+6) = c Display(x+2,y+5) = c Display(x+2,y+4) = c Display(x+3,y+6) = c Case 'x' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+5) = c Display(x+4,y+6) = c Display(x+1,y+2) = c Display(x+1,y+4) = c Display(x+2,y+3) = c Display(x+3,y+2) = c Display(x+3,y+4) = c Case 'y' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+3,y+3) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+0,y+5) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Case 'z' Display(x+0,y+0) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+4,y+0) = c Display(x+0,y+6) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+6) = c Display(x+4,y+1) = c Display(x+3,y+2) = c Display(x+2,y+3) = c Display(x+1,y+4) = c Display(x+0,y+5) = c Case '0' Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+1,y+4) = c Display(x+2,y+3) = c Display(x+3,y+2) = c Case '1' Display(x+2,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+2,y+6) = c Display(x+1,y+1) = c Display(x+1,y+6) = c Display(x+3,y+6) = c Case '2' Display(x+0,y+6) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+6) = c Display(x+0,y+5) = c Display(x+1,y+4) = c Display(x+2,y+3) = c Display(x+3,y+2) = c Display(x+4,y+1) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+0,y+1) = c Case '3' Display(x+0,y+1) = c Display(x+0,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Case '4' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+4,y+6) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Case '5' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+4,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+0,y+5) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Case '6' Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+1) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Case '7' Display(x+0,y+0) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+4,y+0) = c Display(x+0,y+1) = c Display(x+4,y+1) = c Display(x+3,y+2) = c Display(x+2,y+3) = c Display(x+1,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Case '8' Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Case '9' Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+0,y+1) = c Display(x+0,y+2) = c Display(x+0,y+5) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Case 'ä' Display(x+0,y+6) = c Display(x+0,y+5) = c Display(x+0,y+4) = c Display(x+0,y+3) = c Display(x+4,y+6) = c Display(x+4,y+5) = c Display(x+4,y+4) = c Display(x+4,y+3) = c Display(x+1,y+5) = c Display(x+2,y+5) = c Display(x+3,y+5) = c Display(x+1,y+2) = c Display(x+2,y+1) = c Display(x+3,y+2) = c Display(x+0,y+0) = c Display(x+4,y+0) = c Case 'ö' Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+4,y+3) = c Display(x+4,y+4) = c Display(x+4,y+5) = c Display(x+1,y+2) = c Display(x+2,y+2) = c Display(x+3,y+2) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+0,y+0) = c Display(x+4,y+0) = c Case 'ü' Display(x+0,y+2) = c Display(x+0,y+3) = c Display(x+0,y+4) = c Display(x+0,y+5) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+5) = c Display(x+4,y+4) = c Display(x+4,y+3) = c Display(x+4,y+2) = c Display(x+0,y+0) = c Display(x+4,y+0) = c Case '!' Display(x+2,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+6) = c Case '?' Display(x+0,y+1) = c Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+3,y+0) = c Display(x+4,y+1) = c Display(x+4,y+2) = c Display(x+3,y+3) = c Display(x+2,y+4) = c Display(x+2,y+6) = c Case '#' Display(x+0,y+2) = c Display(x+1,y+2) = c Display(x+2,y+2) = c Display(x+3,y+2) = c Display(x+4,y+2) = c Display(x+0,y+4) = c Display(x+1,y+4) = c Display(x+2,y+4) = c Display(x+3,y+4) = c Display(x+4,y+4) = c Display(x+1,y+1) = c Display(x+1,y+3) = c Display(x+1,y+5) = c Display(x+3,y+1) = c Display(x+3,y+3) = c Display(x+3,y+5) = c Case '+' Display(x+0,y+3) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+4,y+3) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Case '-' Display(x+0,y+3) = c Display(x+1,y+3) = c Display(x+2,y+3) = c Display(x+3,y+3) = c Display(x+4,y+3) = c Case ',' Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+3,y+3) = c Display(x+3,y+4) = c Display(x+3,y+5) = c Display(x+2,y+6) = c Case '.' Display(x+2,y+5) = c Display(x+2,y+6) = c Display(x+3,y+5) = c Display(x+3,y+6) = c Case ';' Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+3,y+1) = c Display(x+3,y+2) = c Display(x+2,y+4) = c Display(x+3,y+4) = c Display(x+3,y+5) = c Display(x+2,y+6) = c Case ':' Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+3,y+1) = c Display(x+3,y+2) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+3,y+4) = c Display(x+3,y+5) = c Case '_' Display(x+0,y+6) = c Display(x+1,y+6) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Display(x+4,y+6) = c Case '%' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+1,y+0) = c Display(x+1,y+1) = c Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+3,y+2) = c Display(x+2,y+3) = c Display(x+1,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Display(x+3,y+5) = c Display(x+3,y+6) = c Display(x+4,y+5) = c Display(x+4,y+6) = c Case '/' Display(x+4,y+0) = c Display(x+4,y+1) = c Display(x+3,y+2) = c Display(x+2,y+3) = c Display(x+1,y+4) = c Display(x+0,y+5) = c Display(x+0,y+6) = c Case '"' Display(x+1,y+0) = c Display(x+1,y+1) = c Display(x+3,y+0) = c Display(x+3,y+1) = c Case '(' Display(x+3,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+3,y+6) = c Case ')' Display(x+1,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+1,y+6) = c Case '[' Display(x+3,y+0) = c Display(x+2,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+2,y+6) = c Display(x+3,y+6) = c Case ']' Display(x+1,y+0) = c Display(x+2,y+0) = c Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Display(x+2,y+6) = c Display(x+1,y+6) = c Case '\' Display(x+0,y+0) = c Display(x+0,y+1) = c Display(x+1,y+2) = c Display(x+2,y+3) = c Display(x+3,y+4) = c Display(x+4,y+5) = c Display(x+4,y+6) = c Case '<' Display(x+3,y+1) = c Display(x+2,y+2) = c Display(x+1,y+3) = c Display(x+2,y+4) = c Display(x+3,y+5) = c Case '|' Display(x+2,y+1) = c Display(x+2,y+2) = c Display(x+2,y+3) = c Display(x+2,y+4) = c Display(x+2,y+5) = c Case '>' Display(x+1,y+1) = c Display(x+2,y+2) = c Display(x+3,y+3) = c Display(x+2,y+4) = c Display(x+1,y+5) = c Case '@' Display(x+0,y+4) = c Display(x+1,y+3) = c Display(x+2,y+2) = c Display(x+3,y+3) = c Display(x+4,y+4) = c Case '€' Display(x+0,y+2) = c Display(x+1,y+3) = c Display(x+2,y+4) = c Display(x+3,y+3) = c Display(x+4,y+2) = c Case '=' Display(x+0,y+2) = c Display(x+1,y+2) = c Display(x+2,y+2) = c Display(x+3,y+2) = c Display(x+4,y+2) = c Display(x+0,y+4) = c Display(x+1,y+4) = c Display(x+2,y+4) = c Display(x+3,y+4) = c Display(x+4,y+4) = c Case '*' Display(x+0,y+2) = c Display(x+1,y+2) = c Display(x+2,y+2) = c Display(x+3,y+2) = c Display(x+4,y+2) = c Display(x+2,y+0) = c Display(x+2,y+1) = c Display(x+1,y+3) = c Display(x+0,y+4) = c Display(x+3,y+3) = c Display(x+4,y+4) = c EndSelect EndProcedure