Older Version Newer Version

KcDan KcDan Oct 18, 2009

[[code format="qbasic"]]
    colors$(1)="0 0 0"
    colors$(2)="1 2 3"
    colors$(3)="0 255 0"
    colors$(6)="255 255 0"
    colors$(7)="238 83 17"
    colors$(8)="128 64 0"
    nomainwin
    WindowWidth = 223
    WindowHeight = 223
    UpperLeftX=int((DisplayWidth-WindowWidth)/2)
    UpperLeftY=int((DisplayHeight-WindowHeight)/2)


    graphicbox #main.g,   0,   0, 223, 223

    open "Happy Halloween! Alt+F4 to exit." for window_popup as #main
    print #main.g, "down; fill black; flush"
    print #main, "font ms_sans_serif 10"
    print #main, "trapclose [quit.main]"


    timer 1,[draw]
    [draw]
    look=finput()
    if look<>9 then
        select look
        case 1
            print #main.g,"color ";colors$(finput())
        case 2
            print #main.g,"size ";finput()
        case 3
            StartX=finput()-32
            StartY=finput()-32
        case 4
            CurX=finput()-32
            CurY=finput()-32
            print #main.g, "line ";StartX;" ";StartY;" ";CurX;" ";CurY
            StartX=CurX
            StartY=CurY
        case 5
            CurX=finput()-32
            CurY=finput()-32
            print #main.g, "line ";StartX;" ";StartY;" ";CurX;" ";CurY
        end select
    else
        timer 0
        goto [done]
    end if
    wait

[done]
    notice "Happy Halloween! Press Alt+F4 to close the window."
wait

[quit.main]
    timer 0
    close #main
    end

function finput()
     read a$
     finput=hexdec(a$)
     data 1,1,2,64,3,54,4C,5,54,4C,3,CE,4F,5,CE,4F,3,D8,CD,5,D8,CD,3,3E,D6,5,3E,D6,3,8E,96,5,8E,96,3,E1,94,5,E1,94,3,97,45,5,97
     data 45,3,39,90,5,39,90,3,93,E3,5,93,E3,3,6B,BF,5,6B,BF,3,32,28,5,32,28,3,28,55,5,28,55,3,73,25,5,73,25,3,A9,26,5,A9,26,3,E3,2E
     data 5,E3,2E,3,F6,6A,5,F6,6A,3,F9,FA,5,F9,FA,3,C3,F9,5,C3,F9,3,5E,F9,5,5E,F9,1,7,2,1,3,84,4E,4,83,4E,4,82,4E,4,81,4E,4,80,4E
     data 4,7E,4E,4,7D,4E,4,7C,4E,4,7B,4E,4,7A,4E,4,78,4E,4,77,4E,4,76,4E,4,75,4E,4,73,4E,4,72,4F,4,70,4F,4,6F,4F,4,6E,4F,4,6D,4F,4
     data 6C,4F,4,6B,4F,4,69,50,4,67,50,4,66,50,4,65,51,4,64,51,4,63,51,4,62,52,4,61,52,4,60,52,4,60,53,4,5F,53,4,5E,55,4,5D,55,4,5C
     data 56,4,5B,57,4,5B,57,4,5A,58,4,5A,59,4,5A,5A,4,5A,5B,4,5A,5C,4,5A,5D,4,59,5E,4,59,5F,4,59,61,4,58,61,4,58,63,4,58,64,4,58,66
     data 4,57,68,4,57,6A,4,57,6B,4,57,6D,4,57,6E,4,56,70,4,56,71,4,56,73,4,56,75,4,55,77,4,55,79,4,54,79,4,54,7B,4,54,7C,4,54,7D,4
     data 54,7F,4,54,80,4,54,81,4,54,82,4,53,83,4,53,85,4,53,87,4,53,88,4,52,88,4,52,8A,4,52,8B,4,52,8C,4,52,8D,4,52,8E,4,52,90,4,52
     data 91,4,52,92,4,52,93,4,52,94,4,53,96,4,53,97,4,53,98,4,54,99,4,54,9A,4,55,9C,4,56,9D,4,57,9F,4,57,A0,4,58,A0,4,5A,A2,4,5A,A3
     data 4,5B,A4,4,5C,A5,4,5D,A6,4,5E,A7,4,60,A9,4,61,AA,4,62,AB,4,63,AC,4,64,AC,4,66,AD,4,66,AF,4,68,AF,4,69,AF,4,6A,B1,4,6B,B2,4
     data 6C,B2,4,6D,B3,4,6F,B5,4,70,B5,4,72,B5,4,74,B7,4,75,B7,4,77,B8,4,78,B8,4,7A,B9,4,7B,BA,4,7D,BB,4,7F,BB,4,80,BC,4,83,BD,4,84
     data BE,4,86,BE,4,88,BF,4,8B,C1,4,8D,C1,4,8F,C1,4,91,C3,4,93,C3,4,95,C4,4,96,C4,4,98,C4,4,99,C4,4,9B,C5,4,9C,C5,4,9D,C5,4,9F,C5
     data 4,A0,C5,4,A2,C5,4,A3,C5,4,A5,C5,4,A7,C5,4,A8,C5,4,AA,C5,4,AB,C5,4,AC,C5,4,AE,C5,4,AF,C5,4,B0,C5,4,B1,C5,4,B2,C4,4,B3,C4,4
     data B4,C4,4,B6,C4,4,B7,C4,4,B7,C3,4,B8,C3,4,BA,C2,4,BA,C1,4,BB,C1,4,BC,C1,4,BD,C0,4,BE,BF,4,BF,BE,4,C0,BE,4,C0,BD,4,C1,BB,4,C2
     data BA,4,C2,B9,4,C3,B8,4,C3,B7,4,C4,B6,4,C5,B5,4,C5,B4,4,C6,B3,4,C6,B2,4,C6,B1,4,C6,B0,4,C7,AF,4,C7,AE,4,C8,AD,4,C8,AC,4,C9,AB
     data 4,C9,AA,4,C9,A9,4,CA,A9,4,CA,A8,4,CA,A7,4,CB,A6,4,CC,A5,4,CC,A4,4,CC,A3,4,CD,A1,4,CE,A0,4,CF,9F,4,CF,9E,4,CF,9D,4,CF,9C,4
     data D0,9B,4,D1,9A,4,D1,98,4,D2,97,4,D2,96,4,D2,94,4,D3,92,4,D3,91,4,D4,8F,4,D4,8D,4,D4,8C,4,D4,8B,4,D5,89,4,D5,88,4,D5,86,4,D5
     data 85,4,D5,84,4,D5,83,4,D5,82,4,D5,80,4,D5,7F,4,D5,7E,4,D5,7D,4,D5,7C,4,D5,7A,4,D5,79,4,D5,78,4,D5,77,4,D5,76,4,D5,75,4,D5,74
     data 4,D5,73,4,D5,71,4,D5,70,4,D5,6E,4,D4,6D,4,D4,6C,4,D4,6B,4,D4,6A,4,D3,69,4,D3,68,4,D3,67,4,D2,66,4,D2,65,4,D1,64,4,D0,63,4
     data CF,62,4,CF,61,4,CD,5F,4,CC,5E,4,CB,5D,4,C9,5C,4,C8,5B,4,C6,5B,4,C5,5A,4,C3,59,4,C1,58,4,C0,57,4,BE,56,4,BD,56,4,BB,55,4,BA
     data 55,4,B8,54,4,B6,53,4,B4,52,4,B2,52,4,B1,52,4,B0,51,4,AF,51,4,AE,51,4,AD,50,4,AB,4F,4,AA,4F,4,A8,4F,4,A6,4F,4,A5,4E,4,A3,4E
     data 4,A2,4D,4,A1,4D,4,A0,4D,4,9F,4C,4,9E,4C,4,9D,4C,4,9C,4C,4,9B,4C,4,9A,4C,4,99,4C,4,98,4C,4,97,4C,4,96,4B,4,95,4B,4,94,4B,4
     data 93,4B,4,92,4B,4,91,4B,4,90,4B,4,8F,4B,4,8D,4B,4,8C,4B,4,8B,4B,4,8A,4B,4,89,4B,4,88,4B,4,87,4B,4,86,4B,4,85,4B,4,84,4B,4,83
     data 4B,4,82,4B,4,81,4B,4,81,4C,4,80,4C,4,7F,4C,4,7E,4C,4,7D,4C,4,7C,4D,4,7B,4D,5,7B,4D,2,32,3,93,7E,5,93,7E,3,A1,9E,5,A1,9E,3
     data 78,97,5,78,97,3,72,6D,5,72,6D,3,95,61,4,96,61,5,96,61,3,BA,70,5,BA,70,3,B9,8C,5,B9,8C,3,B5,AF,5,B5,AF,3,90,B1,5,90,B1,3,69
     data A4,4,69,A5,5,69,A5,3,54,9B,4,53,9B,5,53,9B,3,C3,94,5,C3,94,3,C0,83,5,C0,83,3,BD,6B,4,BC,6A,5,BC,6A,3,9C,5E,5,9C,5E,3,79,5F
     data 5,79,5F,3,5F,69,4,5E,69,4,5E,6A,5,5E,6A,3,60,7D,4,60,7E,5,60,7E,3,4F,7F,4,4E,7F,5,4E,7F,3,51,B3,5,51,B3,3,63,C0,4,64,C0,5
     data 64,C0,3,7B,C8,4,7C,C8,4,7D,C9,5,7D,C9,3,9E,D0,4,9E,D0,5,9E,D0,3,B7,CD,4,B7,CC,5,B7,CC,3,C6,BC,5,C6,BC,3,CB,A9,5,CB,A9,2,A
     data 3,39,92,5,39,92,3,39,8D,5,39,8D,3,39,8B,5,39,8B,3,39,88,5,39,88,3,39,85,5,39,85,3,39,96,5,39,96,3,39,9D,5,39,9D,3,39,A2,5
     data 39,A2,3,3A,A6,5,3A,A6,3,3A,AA,5,3A,AA,3,3A,AE,5,3A,AE,3,39,B2,5,39,B2,3,39,B6,5,39,B6,3,3C,B9,5,3C,B9,3,39,9A,5,39,9A,3,50
     data CA,5,50,CA,3,69,D9,5,69,D9,3,66,D8,5,66,D8,3,62,D8,5,62,D8,3,6F,DC,5,6F,DC,3,8A,E0,5,8A,E0,3,85,E0,5,85,E0,3,8F,E3,5,8F,E3
     data 3,AE,E3,5,AE,E3,3,AB,E5,5,AB,E5,3,B4,E5,5,B4,E5,3,A8,E6,5,A8,E6,3,B1,E6,5,B1,E6,3,B7,E5,5,B7,E5,3,CD,D2,5,CD,D2,3,DE,B7,5
     data DE,B7,3,DE,BC,5,DE,BC,3,DC,BE,5,DC,BE,3,E0,B2,5,E0,B2,3,DD,95,5,DD,95,3,DF,98,5,DF,98,3,E1,9F,5,E1,9F,3,E1,A3,5,E1,A3,3,E4
     data A8,5,E4,A8,3,E4,AE,5,E4,AE,3,E2,B4,5,E2,B4,2,1E,3,D3,86,5,D3,86,3,DC,94,5,DC,94,3,E0,A1,5,E0,A1,3,DA,73,5,DA,73,3,DE,7F,5
     data DE,7F,3,E2,88,5,E2,88,3,E4,91,5,E4,91,3,D6,63,5,D6,63,3,C8,54,5,C8,54,3,B4,4F,5,B4,4F,3,A5,49,5,A5,49,3,90,48,5,90,48,3,7D
     data 46,5,7D,46,3,6E,49,4,6E,48,5,6E,48,3,5F,4A,5,5F,4A,3,54,54,5,54,54,3,51,61,5,51,61,3,49,6A,5,49,6A,3,47,5E,5,47,5E,2,F,3
     data 4D,50,5,4D,50,3,54,47,5,54,47,3,69,41,5,69,41,2,A,3,42,57,4,43,57,4,44,56,4,44,55,4,45,55,4,45,54,4,45,53,4,46,53,4,46,52
     data 4,47,52,4,48,52,4,49,51,4,4A,50,4,4B,4F,4,4B,4E,4,4C,4D,4,4C,4C,4,4D,4C,4,4E,4C,4,4E,4A,4,4E,49,4,4F,49,4,50,49,4,50,48,4
     data 51,48,4,51,47,4,51,46,4,52,46,4,53,46,4,54,45,4,55,44,4,56,44,4,57,43,4,58,43,4,59,43,4,5A,43,4,5A,42,4,5B,42,4,5C,42,4,5D
     data 41,4,5E,40,4,5F,40,4,60,40,4,61,3F,4,62,3F,4,63,3F,4,64,3E,4,66,3E,4,66,3D,4,67,3D,4,68,3D,4,69,3D,4,6A,3D,4,6B,3C,4,6C,3C
     data 4,6D,3B,4,6E,3B,4,6F,3A,4,70,3A,4,71,3A,4,72,3A,4,73,3A,4,74,3A,4,75,3A,4,76,3A,4,77,3A,4,78,3A,4,79,3A,4,7A,3A,4,7B,3A,4
     data 7C,3A,4,7D,3A,4,7E,3A,4,80,3A,4,81,3A,4,82,3A,4,83,3A,4,84,3A,4,85,3A,4,86,3A,4,87,3A,4,88,3A,4,89,3A,4,8A,3A,4,8B,3A,4,8C
     data 3A,4,8D,3A,4,8E,3A,4,8F,3A,4,90,3A,4,91,3A,4,92,3A,4,93,3A,4,94,3A,4,95,3A,4,96,3A,4,97,3A,4,98,3A,4,99,3A,4,9A,3A,4,9B,3A
     data 4,9C,3A,4,9D,3A,4,9E,3A,4,9F,3A,4,A0,3A,4,A1,3A,4,A2,3A,4,A3,3A,4,A4,3A,4,A5,3A,4,A6,3A,4,A7,3A,4,A8,3A,4,A9,3A,4,AA,3A,4
     data AB,3A,4,AD,3A,4,AE,3A,4,AF,3A,4,B0,3B,4,B1,3B,4,B2,3B,4,B3,3C,4,B4,3C,4,B5,3C,4,B6,3D,4,B7,3D,4,B8,3D,4,B9,3D,4,BA,3D,4,BA
     data 3E,4,BB,3F,4,BC,3F,4,BD,40,4,BE,40,4,BF,40,4,C0,40,4,C0,41,4,C2,41,4,C3,41,4,C3,42,4,C4,42,4,C5,43,4,C6,43,4,C7,43,4,C8,43
     data 4,C9,43,4,C9,44,4,CB,44,4,CC,45,4,CD,45,4,CD,46,4,CE,46,4,CF,46,4,D0,46,4,D1,47,4,D2,48,4,D2,49,4,D3,49,4,D4,49,4,D5,4A,4
     data D5,4B,4,D6,4B,4,D6,4C,4,D7,4C,4,D8,4C,4,D8,4D,4,D9,4E,4,DA,4F,4,DB,4F,4,DC,50,4,DD,51,4,DE,52,4,DF,54,4,E0,54,4,E0,55,4,E1
     data 55,4,E1,56,4,E1,57,4,E2,58,4,E3,59,4,E4,5A,4,E4,5B,4,E4,5C,4,E5,5D,4,E6,5E,4,E7,5F,4,E7,60,4,E7,61,4,E7,62,4,E7,63,4,E7,64
     data 4,E7,65,4,E7,66,4,E7,67,4,E8,67,4,E8,68,4,E8,69,4,E9,6A,4,E9,6B,4,E9,6C,4,E9,6D,4,EA,6D,4,EA,6E,4,EA,6F,4,EA,70,4,EB,70,4
     data EB,71,4,EB,72,4,EB,73,4,EC,73,4,EC,74,4,EC,75,4,ED,76,4,ED,77,4,ED,78,4,ED,79,4,ED,7A,4,ED,7B,4,ED,7C,4,ED,7D,4,ED,7E,4,ED
     data 7F,4,ED,80,4,ED,81,4,ED,82,4,ED,83,4,ED,84,4,EE,85,4,EE,86,4,EE,87,4,EE,88,4,EF,88,4,EF,89,4,EF,8A,4,EF,8B,4,EF,8C,4,EF,8D
     data 4,EF,8E,4,EF,8F,4,EF,90,4,EE,90,4,EE,91,4,ED,92,4,ED,93,4,ED,94,5,ED,94,3,DB,5D,4,DB,5C,4,DB,5B,4,DA,5B,4,DA,5A,4,D9,5A,4
     data D9,58,4,D8,58,4,D8,57,4,D7,56,4,D6,55,4,D5,55,4,D4,55,4,D3,54,4,D2,54,4,D2,53,4,D1,53,4,D0,52,4,CF,52,4,CE,52,4,CD,51,4,CC
     data 51,4,CB,51,4,CA,50,4,C9,50,4,C8,4F,4,C6,4F,4,C5,4F,4,C3,4F,4,C3,4E,4,C2,4E,4,C2,4D,4,C1,4D,4,C0,4C,4,BF,4C,4,BE,4C,4,BD,4B
     data 4,BD,4A,4,BC,4A,4,BC,49,4,BB,49,4,BB,48,4,BC,47,4,BD,47,4,BE,47,5,BE,47,1,6,3,7E,67,5,7E,67,3,C6,6A,5,C6,6A,3,90,6E,5,90
     data 6E,3,86,79,5,86,79,3,78,79,5,78,79,3,72,72,4,71,72,5,71,72,3,6F,65,5,6F,65,3,75,59,4,75,58,5,75,58,3,8C,57,5,8C,57,3,90,5F
     data 5,90,5F,3,BA,61,5,BA,61,3,B9,6F,5,B9,6F,3,BD,7D,4,BD,7E,5,BD,7E,3,CF,7F,5,CF,7F,3,D7,79,4,D7,78,4,D7,77,5,D7,77,3,D8,6B,4
     data D8,6A,5,D8,6A,3,D8,5C,4,D7,5B,4,D5,5B,5,D5,5B,3,CD,54,5,CD,54,3,BF,55,5,BF,55,3,6F,94,5,6F,94,3,7F,9A,5,7F,9A,3,90,9F,5,90
     data 9F,3,A4,A2,5,A4,A2,3,B6,A3,5,B6,A3,3,C6,A3,5,C6,A3,3,D4,9F,5,D4,9F,3,D5,AC,5,D5,AC,3,D2,B9,4,D2,BA,5,D2,BA,3,C6,C2,5,C6,C2
     data 3,B6,C9,5,B6,C9,3,A2,C8,5,A2,C8,3,97,C5,5,97,C5,3,8A,C1,5,8A,C1,3,7F,BC,4,7E,BC,5,7E,BC,3,6F,B6,5,6F,B6,3,6C,AE,4,6C,AD,5
     data 6C,AD,3,6A,A3,5,6A,A3,3,6A,9A,5,6A,9A,3,6D,64,5,6D,64,3,67,64,5,67,64,3,5F,61,5,5F,61,3,56,61,5,56,61,3,50,5C,5,50,5C,3,48
     data 5A,5,48,5A,3,45,58,5,45,58,3,4C,5B,4,4D,5B,4,4E,5B,4,4E,5C,4,4F,5C,4,50,5D,4,51,5D,4,52,5E,4,53,5E,4,54,5E,4,55,5E,4,56,5E
     data 4,57,5F,4,58,5F,4,58,60,4,59,60,4,5A,60,4,5A,61,4,5B,61,4,5C,61,4,5D,61,4,5E,61,4,5F,61,4,60,61,4,61,61,4,62,61,4,63,62,4
     data 64,62,4,65,62,4,66,62,4,67,62,4,68,62,4,69,63,4,6A,63,4,6B,63,4,6C,64,4,6D,64,5,6D,64,3,DC,6A,4,DC,69,4,DD,69,4,DE,69,4,DE
     data 68,4,DF,68,4,E0,68,4,E0,67,4,E1,67,4,E1,66,4,E1,65,4,E2,64,4,E3,64,4,E3,63,4,E4,63,4,E4,62,4,E4,61,5,E4,61,3,D7,69,4,D6,69
     data 4,D6,68,4,D6,67,4,D6,66,4,D6,65,4,D6,64,4,D6,63,4,D6,62,4,D6,61,4,D6,60,4,D6,5F,4,D6,5E,4,D5,5E,4,D5,5D,4,D5,5C,4,D5,5B,4
     data D4,5A,4,D4,59,4,D3,58,4,D2,58,4,D2,57,4,D1,57,4,D0,56,4,CF,56,4,CE,55,4,CD,55,4,CC,55,4,CB,55,4,CA,55,4,C9,55,4,C9,54,4,C8
     data 54,4,C7,54,4,C6,54,4,C5,54,4,C4,54,4,C3,54,4,C2,54,4,C1,55,4,C0,55,4,BF,55,4,BF,56,4,BE,56,4,BE,57,4,BD,57,4,BD,58,4,BD,59
     data 4,BD,5A,4,BD,5B,4,BC,5B,4,BC,5C,4,BB,5D,4,BB,5E,4,BA,5F,4,BA,61,4,BA,62,4,BA,63,4,BA,64,4,BA,65,4,BA,66,4,BA,67,4,BA,68,4
     data BA,69,4,BA,6A,4,BA,6B,4,BA,6C,4,BA,6D,4,BA,6E,4,BA,6F,4,BA,70,4,BA,71,4,BA,72,4,BA,73,4,BA,74,4,BA,75,4,BA,76,4,BA,77,4,BA
     data 78,4,BA,79,4,BB,79,4,BC,7A,4,BD,7B,4,BE,7C,4,BF,7C,4,C0,7C,4,C1,7C,4,C3,7C,4,C4,7C,4,C5,7C,4,C6,7C,4,C7,7C,4,C8,7C,4,C9,7C
     data 4,CA,7C,4,CB,7C,4,CC,7C,4,CD,7C,4,CE,7C,4,CF,7C,4,D0,7C,4,D1,7C,4,D2,7C,4,D2,7B,4,D3,7B,4,D3,7A,4,D4,7A,4,D5,79,4,D6,79,4
     data D6,78,4,D7,78,4,D7,77,4,D7,76,4,D8,75,4,D8,74,4,D8,73,4,D8,72,4,D8,71,4,D8,70,4,D8,6F,4,D8,6E,4,D8,6D,4,D8,6C,4,D7,6B,4,D7
     data 6A,4,D6,6A,4,D5,6A,4,D5,69,4,D5,67,4,D4,67,4,D4,66,4,D3,65,4,D3,64,4,D3,63,4,D2,62,4,D2,61,4,D2,60,4,D1,5F,4,D1,5E,4,D0,5E
     data 4,CF,5D,4,CF,5C,4,CE,5B,4,CD,5B,4,CC,5B,4,CB,5C,4,CA,5D,4,C9,5D,4,C8,5D,4,C7,5E,4,C6,5E,4,C5,5E,4,C4,5E,4,C4,5F,4,C4,60,4
     data C4,61,4,C4,62,4,C4,63,4,C4,64,4,C3,66,4,C3,67,4,C3,68,4,C3,69,4,C3,6A,4,C3,6B,4,C3,6C,4,C3,6D,4,C3,6E,4,C3,6F,4,C3,70,4,C3
     data 71,4,C4,71,4,C5,72,4,C6,72,4,C7,72,4,C8,72,4,C9,72,4,CA,73,4,CB,73,4,CC,73,4,CD,73,4,CE,73,4,CF,73,4,CF,72,4,CF,71,4,CF,70
     data 4,CF,6F,4,CF,6E,4,CF,6D,4,CF,6C,4,CF,6B,4,CF,6A,4,CF,69,4,CF,68,4,CF,67,4,CE,66,4,CD,66,4,CC,66,4,CB,66,4,CA,66,4,C9,66,4
     data C9,67,4,C9,68,4,C9,69,4,C8,6A,4,C7,6B,4,C7,6C,4,C7,6D,4,C6,6E,4,C6,6F,4,C6,70,4,C5,71,4,C5,72,4,C4,73,4,C3,73,4,C3,74,4,C2
     data 75,4,C1,76,4,C0,76,4,C0,77,5,C0,77,3,7B,75,4,7B,76,4,7C,76,4,7E,76,4,80,76,4,81,76,4,83,76,4,84,76,4,85,76,4,86,76,4,87,76
     data 4,87,75,4,88,75,4,89,74,4,8A,74,4,8A,73,4,8B,73,4,8B,72,4,8C,72,4,8C,71,4,8D,70,4,8E,70,4,8F,6F,4,8F,6E,4,8F,6D,4,90,6D,4
     data 90,6C,4,90,6B,4,90,6A,4,90,69,4,90,68,4,90,67,4,90,66,4,90,65,4,90,64,4,90,63,4,90,62,4,90,61,4,90,60,4,90,5F,4,90,5E,4,90
     data 5C,4,90,5B,4,90,5A,4,90,59,4,90,58,4,8F,58,4,8E,57,4,8D,56,4,8D,55,4,8C,55,4,8B,55,4,8A,55,4,89,55,4,88,55,4,87,55,4,86,55
     data 4,85,55,4,84,55,4,83,55,4,82,55,4,81,55,4,80,55,4,7F,55,4,7E,55,4,7D,55,4,7C,55,4,7B,55,4,7A,55,4,79,55,4,78,56,4,78,57,4
     data 77,57,4,77,58,4,76,58,4,75,58,4,75,59,4,74,5A,4,73,5B,4,72,5B,4,72,5C,4,72,5D,4,72,5E,4,71,5F,4,71,60,4,71,61,4,71,62,4,71
     data 63,4,71,64,4,70,65,4,70,66,4,70,67,4,6F,67,4,6F,68,4,6F,69,4,6F,6A,4,6F,6C,4,6F,6D,4,6F,6E,4,6F,6F,4,70,6F,4,70,70,4,71,70
     data 4,72,70,4,72,71,4,73,72,4,74,73,4,75,73,4,76,74,4,77,74,4,78,75,4,78,76,4,79,76,4,7A,76,4,7A,77,4,7B,77,4,7B,78,4,7C,78,4
     data 7D,78,4,7E,79,4,7F,79,4,81,79,4,82,79,4,83,79,4,84,79,4,85,79,4,86,79,4,87,79,4,87,78,4,88,78,4,89,78,4,89,77,4,8A,77,4,8A
     data 76,4,8B,75,4,8B,74,4,8B,73,4,8C,72,4,8C,71,4,8C,70,4,8C,6F,4,8C,6E,4,8C,6D,4,8C,6C,4,8C,6B,4,8C,6A,4,8C,69,4,8C,68,4,8C,67
     data 4,8C,66,4,8C,65,4,8C,64,4,8C,63,4,8B,63,4,8B,62,4,8A,61,4,8A,60,4,8A,5F,4,89,5E,4,88,5E,4,87,5D,4,86,5D,4,85,5D,4,84,5D,4
     data 83,5E,4,81,5E,4,80,5F,4,7F,60,4,7E,61,4,7D,62,4,7C,63,4,7B,64,4,7B,65,4,7A,67,4,7A,68,4,7A,69,4,7A,6A,4,7A,6B,4,7A,6C,4,7A
     data 6D,4,7B,6D,4,7C,6D,4,7D,6D,4,7E,6D,4,7F,6D,4,80,6D,4,81,6D,4,82,6D,4,83,6D,4,84,6D,4,84,6C,4,85,6C,4,85,6B,4,86,6B,4,86,6A
     data 4,86,69,4,86,68,4,86,67,4,86,66,4,86,65,4,86,64,4,86,63,4,85,62,4,85,61,4,84,61,4,84,60,4,84,5F,4,83,5F,4,82,5E,4,81,5D,4
     data 80,5D,4,7F,5D,4,7F,5C,4,7E,5C,4,7C,5C,4,7B,5C,4,7A,5C,4,79,5C,4,78,5C,4,77,5C,4,76,5C,4,76,5D,4,75,5E,4,75,5F,4,75,60,4,75
     data 61,4,75,62,4,75,63,4,75,64,4,75,65,4,75,66,4,75,67,4,75,68,4,75,69,4,75,6A,4,75,6B,4,75,6C,5,75,6C,3,8D,66,4,8E,66,4,8F,65
     data 4,90,65,4,91,65,4,92,65,4,93,65,4,94,65,4,95,65,4,96,65,4,97,65,4,98,65,4,99,65,4,9A,65,4,9B,65,4,9C,65,4,9D,65,4,9E,65,4
     data 9F,65,4,A0,65,4,A1,66,4,A2,66,4,A3,66,4,A4,67,4,A5,67,4,A6,67,4,A7,67,4,A8,67,4,A8,68,4,A9,68,4,AA,68,4,AB,68,4,AB,69,4,AD
     data 69,4,AE,69,4,AF,69,4,B0,6A,4,B1,6A,4,B2,6A,4,B3,6A,4,B4,6A,4,B5,6A,4,B6,6A,4,B7,6A,4,B8,6A,5,B8,6A,2,14,3,A6,B7,5,A6,B7,3
     data B6,B5,5,B6,B5,3,C5,B1,5,C5,B1,3,9C,B4,4,9B,B4,5,9B,B4,3,90,AF,5,90,AF,3,84,AA,5,84,AA,3,78,A6,4,77,A6,5,77,A6,2,A,3,72,97
     data 4,72,96,4,73,96,4,74,96,4,75,97,4,76,97,4,77,97,4,78,97,4,79,97,4,7A,98,4,7B,98,4,7B,99,4,7C,99,4,7D,99,4,7E,9A,4,7F,9A,4
     data 80,9A,4,80,9B,4,81,9B,4,81,9C,4,82,9C,4,82,9D,4,83,9D,4,84,9D,4,85,9D,4,86,9E,4,87,9E,4,87,9F,4,88,9F,4,89,9F,4,8A,9F,4,8C
     data 9F,4,8C,A0,4,8D,A0,4,8E,A0,4,8F,A0,4,90,A0,4,91,A0,4,92,A0,4,93,A0,4,94,A0,4,95,A0,4,96,A0,4,97,A0,4,98,A0,4,99,A0,4,9A,A0
     data 4,9B,A0,4,9C,A0,4,9C,A1,4,9E,A1,4,9F,A1,4,A0,A1,4,A1,A1,4,A1,A2,4,A2,A2,4,A3,A2,4,A4,A2,4,A5,A3,4,A6,A3,4,A8,A3,4,A9,A3,4
     data AA,A3,4,AB,A3,4,AC,A3,4,AD,A3,4,AE,A3,4,AF,A3,4,B1,A4,4,B2,A4,4,B3,A4,4,B4,A4,4,B5,A4,4,B6,A4,4,B7,A4,4,B8,A4,4,B9,A4,4,BA
     data A4,4,BB,A4,4,BC,A4,4,BD,A4,4,BE,A4,4,BF,A4,4,C0,A4,4,C1,A4,4,C2,A4,4,C3,A4,4,C4,A4,4,C5,A4,4,C6,A4,4,C7,A4,4,C8,A4,4,C9,A4
     data 4,CA,A4,4,CB,A3,4,CC,A3,4,CD,A3,4,CE,A3,4,CF,A3,4,D0,A3,4,D1,A2,4,D2,A2,4,D2,A1,4,D3,A1,4,D4,A0,4,D5,A0,4,D5,A1,4,D5,A2,4
     data D5,A3,4,D5,A5,4,D5,A6,4,D5,A7,4,D5,A8,4,D5,A9,4,D5,AA,4,D5,AB,4,D5,AC,4,D5,AD,4,D5,AE,4,D5,AF,4,D4,AF,4,D4,B0,4,D4,B1,4,D3
     data B2,4,D3,B3,4,D3,B4,4,D3,B5,4,D2,B5,4,D2,B6,4,D2,B7,4,D2,B8,4,D1,B9,4,D1,BA,4,D0,BB,4,CF,BB,4,CF,BC,4,CE,BC,4,CD,BD,4,CC,BE
     data 4,CB,BE,4,CA,BE,4,CA,BF,4,C9,BF,4,C9,C0,4,C8,C1,4,C7,C1,4,C6,C1,4,C6,C2,4,C5,C3,4,C4,C4,4,C3,C4,4,C2,C5,4,C1,C5,4,C1,C6,4
     data C0,C6,4,BF,C6,4,BE,C7,4,BD,C7,4,BC,C7,4,BB,C7,4,BA,C7,4,BA,C8,4,B8,C8,4,B7,C8,4,B7,C9,4,B6,C9,4,B5,C9,4,B4,C9,4,B3,C9,4,B2
     data C9,4,B1,C9,4,AF,C9,4,AE,C9,4,AD,CA,4,AC,CA,4,AB,CA,4,AA,CA,4,A9,CA,4,A8,CA,4,A7,CA,4,A6,CA,4,A5,CA,4,A4,CA,4,A3,CA,4,A2,CA
     data 4,A1,CA,4,A0,CA,4,9F,CA,4,9E,CA,4,9C,CA,4,9B,CA,4,9A,CA,4,99,CA,4,98,CA,4,97,CA,4,96,C9,4,95,C9,4,95,C8,4,93,C8,4,93,C7,4
     data 92,C7,4,91,C7,4,90,C7,4,90,C6,4,8F,C6,4,8E,C5,4,8D,C5,4,8C,C4,4,8B,C4,4,8A,C4,4,89,C4,4,88,C3,4,87,C3,4,87,C2,4,86,C2,4,84
     data C1,4,83,C1,4,82,C1,4,81,C0,4,80,BF,4,7F,BE,4,7E,BE,4,7D,BE,4,7C,BD,4,7B,BD,4,7B,BC,4,7A,BC,4,79,BB,4,78,BB,4,77,BB,4,76,BA
     data 4,75,BA,4,75,B9,4,74,B8,4,73,B8,4,72,B7,4,72,B6,4,71,B5,4,70,B4,4,70,B3,4,6F,B2,4,6F,B1,4,6E,B0,4,6E,AF,4,6D,AF,4,6D,AE,4
     data 6C,AD,4,6C,AC,4,6C,AB,4,6B,A9,4,6B,A8,4,6B,A7,4,6B,A6,4,6B,A5,4,6B,A4,4,6B,A3,4,6B,A2,4,6B,A1,4,6B,A0,4,6B,9F,4,6B,9E,4,6B
     data 9D,4,6B,9C,4,6B,9B,4,6C,9B,4,6C,9A,4,6C,99,5,6C,99,2,1E,3,A8,B2,5,A8,B2,3,98,AE,5,98,AE,3,79,A6,5,79,A6,3,8C,AF,5,8C,AF,3
     data 84,B2,5,84,B2,3,97,BB,5,97,BB,3,A8,BE,5,A8,BE,3,BA,BC,5,BA,BC,3,BA,B2,5,BA,B2,3,C5,B2,5,C5,B2,1,7,2,A,3,91,97,4,91,98,4
     data 91,99,4,91,9A,4,91,9B,4,91,9C,4,91,9D,4,91,9E,4,91,9F,4,91,A0,4,91,A1,4,91,A2,4,91,A3,4,91,A4,4,91,A5,4,91,A6,4,91,A7,4,92
     data A7,4,93,A7,4,95,A7,4,96,A7,4,97,A8,4,98,A8,4,99,A8,4,9A,A9,4,9B,A9,4,9C,A9,4,9D,A9,4,9E,A9,4,9F,A9,4,A0,A9,4,A1,AA,4,A2,AA
     data 4,A3,AA,4,A4,AA,4,A5,AA,4,A6,AA,4,A6,A9,4,A7,A8,4,A7,A7,4,A8,A7,4,A8,A6,4,A8,A5,4,A8,A4,4,A8,A3,4,A8,A2,4,A8,A1,4,A8,A0,4
     data A8,9F,4,A8,9E,4,A8,9D,4,A8,9C,4,A8,9D,4,A7,9D,4,A6,9D,4,A5,9D,4,A4,9E,4,A3,9E,4,A2,9E,4,A2,9F,4,A1,9F,4,A0,9F,4,9F,9F,4,9F
     data A0,4,9E,A0,4,9D,A0,4,9C,A0,4,9B,A0,4,9A,A0,4,99,A0,4,98,A0,4,97,A0,4,97,9F,4,97,9E,4,97,9D,4,98,9D,4,99,9D,4,9A,9D,4,9B,9D
     data 4,9C,9D,4,9C,9E,4,9D,9F,4,9E,A0,4,9F,A0,4,9F,A1,4,A0,A2,4,A0,A3,4,A1,A3,4,A2,A3,5,A2,A3,3,C9,CC,4,C9,CB,4,C9,CA,4,C9,C9,4
     data C9,C8,4,C9,C7,4,C9,C6,4,C9,C5,4,C9,C4,4,C9,C3,4,C9,C2,4,C9,C1,4,C9,C0,4,C9,BF,4,C8,BF,4,C7,BF,4,C6,BF,4,C5,BF,4,C4,BF,4,C3
     data BF,4,C2,BF,4,C1,BF,4,C0,BF,4,BF,BF,4,BE,BF,4,BD,BF,4,BC,BF,4,BB,BF,4,BA,BF,4,B9,BF,4,B8,BF,4,B7,BF,4,B6,BF,4,B5,C0,4,B4,C0
     data 4,B3,C0,4,B3,C1,4,B3,C2,4,B3,C3,4,B4,C4,4,B4,C5,4,B4,C6,4,B4,C7,4,B5,C7,4,B5,C8,4,B5,C9,4,B6,C9,4,B6,CA,4,B7,CA,4,B7,CB,4
     data B7,CC,4,B7,CD,4,B7,CE,5,B7,CE,3,C0,C9,5,C0,C9,3,BD,C6,5,BD,C6,3,C3,C6,5,C3,C6,3,BD,CC,5,BD,CC,3,79,B6,4,79,B7,4,79,B8,4,79
     data B9,4,79,BA,4,79,BB,4,79,BC,4,79,BD,4,79,BE,4,79,BF,4,79,C0,4,79,C1,4,79,C2,4,79,C3,4,79,C4,4,79,C5,5,79,C5,3,8C,BB,4,8D,BB
     data 4,8D,BC,4,8D,BD,4,8D,BE,4,8D,BF,4,8D,C0,4,8D,C1,4,8D,C2,4,8D,C3,4,8D,C4,4,8D,C5,4,8D,C6,4,8D,C7,4,8D,C8,4,8D,C9,4,8D,CA,4
     data 8D,CB,5,8D,CB,3,7E,B6,4,7F,B6,4,80,B6,4,81,B6,4,82,B6,4,83,B6,4,84,B7,4,85,B7,4,87,B8,4,88,B8,4,89,B8,5,89,B8,3,83,C1,5,83
     data C1,3,86,C6,5,86,C6,3,81,C3,5,81,C3,3,81,BC,5,81,BC,3,86,BE,5,86,BE,1,8,3,AB,3C,4,AB,3B,4,AB,3A,4,AC,39,4,AD,38,4,AD,37,4
     data AD,36,4,AD,35,4,AD,34,4,AE,34,4,AE,33,4,AE,32,4,AE,31,4,AE,30,4,AE,2F,4,AE,2E,4,AE,2D,4,AE,2C,4,AD,2B,4,AC,2A,4,AC,29,4,AB
     data 28,4,AB,27,4,AA,27,4,AA,26,4,A9,26,4,A9,25,4,A8,25,4,A8,24,4,A7,24,4,A7,23,4,A6,23,4,A5,22,4,A4,22,4,A3,21,4,8D,21,4,8C,22
     data 4,8B,22,4,8B,23,4,8B,24,4,8A,24,4,8A,25,4,8A,26,4,8A,27,5,8A,27,3,9C,3B,4,9C,3A,4,9C,39,4,9C,38,4,9C,37,4,9D,37,4,9E,37,4
     data 9E,36,4,9E,35,4,9E,34,4,9E,33,4,9E,32,4,9E,31,4,9E,30,4,9E,2F,4,9E,2E,4,9E,2D,4,9E,2C,4,9D,2B,4,9C,2B,4,9B,2B,4,9A,2B,4,99
     data 2B,4,97,2B,4,96,2B,4,95,2B,4,94,2B,4,93,2B,4,93,2C,4,92,2C,4,91,2C,4,90,2D,4,90,2E,4,8F,2E,4,8E,2E,4,8D,2F,4,8C,2F,4,8B,2F
     data 4,8A,2F,4,89,2F,4,89,2E,4,89,2D,4,89,2C,4,8A,2C,4,8A,2B,4,8A,2A,5,8A,2A,1,3,3,A3,3B,4,A3,3A,4,A4,3A,4,A5,3A,4,A5,39,4,A5
     data 38,4,A5,37,4,A6,37,4,A6,36,4,A6,35,4,A6,34,4,A6,33,4,A6,32,4,A6,31,4,A6,30,4,A6,2F,4,A6,2E,4,A6,2D,4,A6,2C,4,A5,2B,4,A5,2A
     data 4,A5,29,4,A4,28,4,A3,28,4,A2,28,4,A2,27,4,A1,27,4,A0,26,4,9F,26,4,9E,25,4,9D,25,4,9C,25,4,9B,25,4,9A,25,4,99,25,4,98,25,4
     data 97,25,4,96,25,4,95,25,4,94,25,4,93,25,4,92,25,4,91,25,4,90,25,5,90,25,1,8,3,A2,3D,4,A3,3C,4,A4,3C,4,A5,3B,4,A5,3A,4,A6,3A
     data 4,A7,3A,4,A7,39,4,A7,38,4,A8,38,4,A8,37,4,A8,36,4,A8,35,4,A8,34,4,A8,33,4,A8,32,4,A8,31,4,A8,30,4,A8,2F,4,A8,2E,4,A8,2D,4
     data A8,2C,4,A8,2B,4,A8,2A,4,A7,29,4,A7,28,4,A6,28,4,A6,27,4,A5,27,4,A5,26,4,A5,25,4,A4,25,4,A3,25,4,A2,25,4,A1,24,4,A0,24,4,9F
     data 24,4,9E,23,4,9D,23,4,9C,23,4,9C,22,4,9B,22,4,9A,22,4,99,22,4,98,22,4,97,22,4,96,21,4,95,21,4,94,21,4,93,21,4,92,21,4,91,21
     data 4,90,21,4,8F,21,4,8E,21,4,8D,21,4,8D,22,4,8D,23,4,8D,24,4,8D,25,4,8E,25,4,8F,25,4,90,25,4,90,26,4,91,26,4,92,26,4,93,26,4
     data 93,27,4,94,27,4,95,27,4,96,27,4,97,28,4,98,28,4,99,28,4,9A,28,4,9B,28,4,9C,29,4,9C,2A,4,9E,2B,4,9F,2B,4,9F,2C,4,9F,2D,4,9F
     data 2E,4,A0,2E,4,A0,2F,4,A1,30,4,A1,31,4,A1,32,4,A1,33,4,A1,34,4,A1,35,4,A1,36,4,A1,37,4,A0,38,4,A0,39,4,A0,3A,4,9F,3A,5,9F,3A
     data 1,1,2,1,3,5C,40,4,5C,41,4,5C,42,4,5C,43,4,5C,44,4,5C,45,4,5C,46,4,5C,47,4,5C,48,4,5C,49,4,5C,4A,4,5C,4B,4,5C,4C,4,5C,4D
     data 4,5C,4E,4,5C,4F,4,5C,50,4,5C,52,4,5C,53,4,5C,54,4,5C,55,5,5C,55,3,58,6D,4,58,6E,4,58,6F,4,58,70,4,58,71,4,58,72,4,58,73,4
     data 58,75,4,58,76,4,58,78,4,58,79,4,58,7A,4,58,7C,4,58,7D,4,58,7F,4,58,80,4,58,82,4,58,83,4,58,84,4,58,85,4,58,87,4,58,89,4,58
     data 8B,4,58,8E,4,58,90,4,57,92,4,57,94,4,57,97,4,56,9A,4,56,9B,4,55,9D,4,54,9E,4,54,A0,4,54,A1,4,54,A2,4,54,A3,4,54,A4,4,54,A5
     data 4,54,A6,4,53,A8,4,53,A9,4,53,AA,4,53,AB,4,53,AC,4,53,AE,4,53,AF,4,53,B0,4,53,B2,4,53,B4,4,53,B5,4,53,B6,4,53,B8,4,53,B9,4
     data 53,BA,4,53,BB,4,53,BC,4,53,BD,4,53,BE,4,53,BF,4,53,C0,4,53,C1,4,54,C1,4,54,C2,4,54,C3,4,54,C4,4,55,C5,4,55,C6,4,56,C7,4,57
     data C7,4,57,C8,4,57,C9,4,57,CA,4,57,CB,4,57,CC,4,58,CD,4,58,CE,4,59,CE,4,59,CF,4,59,D0,4,59,D1,5,59,D1,3,84,39,4,84,3A,4,84,3B
     data 4,84,3C,4,84,3D,4,84,3E,4,84,3F,4,84,40,4,84,41,4,84,42,4,84,43,4,84,44,4,84,45,4,84,46,4,84,47,4,84,48,4,84,49,5,84,49,3
     data 89,83,4,89,84,4,89,85,4,89,86,4,89,87,4,89,88,4,89,89,4,89,8A,4,89,8B,4,89,8C,4,89,8D,4,89,8E,4,89,8F,4,89,90,4,89,91,4,88
     data 91,5,88,91,3,89,BC,4,89,BD,4,89,BE,4,89,BF,4,89,C1,4,89,C2,4,89,C3,4,89,C4,4,89,C5,4,89,C6,4,89,C7,4,89,C8,4,89,C9,4,89,CA
     data 4,89,CB,4,89,CC,4,89,CD,4,89,CE,4,89,D0,4,89,D1,4,89,D2,4,89,D3,4,89,D4,4,89,D5,4,89,D6,4,89,D7,4,88,D9,4,88,DA,4,88,DB,4
     data 88,DC,4,88,DD,5,88,DD,3,AE,43,4,AE,45,4,AE,46,4,AF,47,4,AF,48,4,B0,49,4,B0,4B,4,B0,4C,4,B1,4C,4,B1,4D,4,B1,4E,4,B1,4F,4,B1
     data 50,4,B1,51,4,B1,52,4,B1,53,4,B1,54,4,B1,55,4,B1,56,4,B1,57,4,B1,58,4,B1,59,4,B1,5A,5,B1,5A,3,B0,73,4,B0,75,4,B0,76,4,B0,77
     data 4,B0,78,4,B0,79,4,B0,7A,4,B0,7B,4,B0,7C,4,B0,7D,4,B0,7F,4,B1,80,4,B1,82,4,B1,84,4,B1,85,4,B1,86,4,B1,87,4,B1,88,4,B1,89,4
     data B1,8B,4,B1,8C,4,B1,8D,4,B1,8E,4,B1,8F,4,B1,90,4,B1,91,4,B1,92,4,B1,93,4,B1,94,4,B1,95,4,B1,96,5,B1,96,3,B2,D0,4,B1,D0,4,B0
     data D1,4,B0,D2,4,B0,D3,4,B0,D5,4,B0,D6,4,B0,D7,4,B0,D8,4,B0,D9,4,B0,DA,4,B0,DB,4,B0,DC,4,B0,DD,4,B0,DE,4,B0,DF,4,B0,E0,4,B0,E1
     data 4,B0,E2,4,B0,E3,4,B0,E4,4,B0,E5,4,B0,E6,4,AF,E6,4,AF,E7,5,AF,E7,3,D9,49,4,D9,4A,4,D9,4B,4,D9,4C,4,DA,4C,4,DA,4D,4,DA,4E,4
     data DA,4F,4,DA,50,5,DA,50,3,E1,73,4,E1,74,4,E1,76,4,E1,78,4,E1,79,4,E2,7B,4,E2,7C,4,E3,7D,4,E3,7F,4,E3,81,4,E3,82,4,E3,83,4,E3
     data 84,4,E3,85,4,E3,86,4,E3,88,4,E3,89,4,E3,8A,4,E3,8B,4,E3,8C,4,E3,8D,4,E3,8E,4,E3,8F,4,E3,91,4,E3,92,4,E3,93,4,E2,94,4,E2,95
     data 4,E2,97,4,E2,98,4,E2,99,4,E2,9A,4,E2,9B,4,E2,9C,4,E2,9D,4,E2,9E,4,E2,9F,4,E2,A0,4,E2,A1,4,E2,A2,4,E2,A3,4,E2,A4,4,E2,A5,4
     data E2,A6,4,E2,A7,4,E2,A8,4,E2,A9,4,E2,AA,4,E2,AB,4,E2,AC,4,E2,AD,4,E2,AE,4,E1,AE,4,E1,AF,4,E1,B0,4,E1,B1,4,E1,B2,4,E1,B3,4,E1
     data B4,4,E0,B5,5,E0,B5,3,68,37,4,69,37,4,69,38,4,69,39,4,6A,39,4,6A,3A,4,6B,3A,4,6C,3B,4,6C,3C,4,6D,3D,4,6E,3D,4,6E,3E,4,6F,3F
     data 4,6F,40,4,70,40,4,70,41,4,71,41,4,71,42,4,72,43,4,73,44,4,74,44,4,75,45,4,76,45,4,77,46,4,78,46,4,7A,46,4,7B,47,4,7C,48,4
     data 7D,49,4,7E,49,4,7F,49,4,80,49,4,81,49,4,82,49,4,83,49,4,84,49,4,85,49,4,87,4A,4,88,4A,4,89,4A,4,8A,4A,4,8C,4A,4,8D,4B,4,8E
     data 4B,4,8F,4B,4,90,4B,4,92,4B,4,93,4B,4,94,4C,4,96,4C,4,98,4C,4,99,4C,4,9A,4C,4,9B,4C,4,9C,4C,4,9E,4C,4,9F,4C,4,A0,4C,4,A1,4C
     data 4,A2,4C,4,A3,4C,4,A4,4C,4,A5,4C,4,A6,4C,4,A7,4C,4,A8,4C,4,A9,4C,4,AA,4C,4,AB,4C,4,AD,4C,4,AE,4C,4,AF,4C,4,B0,4C,4,B1,4C,4
     data B1,4B,4,B2,4B,4,B3,4B,4,B4,4A,4,B5,4A,4,B6,4A,4,B7,49,4,B9,49,4,BA,48,4,BB,47,4,BC,47,4,BD,46,4,BE,46,4,BE,45,4,BF,45,4,BF
     data 44,4,C0,44,4,C0,43,4,C1,43,4,C1,42,4,C2,41,4,C2,40,4,C3,40,4,C3,3F,4,C4,3E,4,C5,3D,4,C5,3C,4,C5,3B,4,C5,3A,5,C5,3A,9
end function



[[code]]