Microsoft Small Basic

Program Listing:
Embed this in your website
'embedded line drawing
content[1] = "152,17,164,17,151,18,166,18,148,19,167,19,145,20,168,20,144,21,169,21,142,22,169,22,141,23,169,23,139,24,169,24,138,25,169,25,137,26,168,26,136,27,166,27,135,28,163,28,134,29,161,29,134,30,160,30,133,31,158,31,132,32,156,32,132,33,154,33,132,34,152,34,131,35,151,35,131,36,149,36,130,37,147,37,175,37,175,37,177,37,182,37,130,38,146,38,175,38,183,38,130,39,145,39,174,39,183,39,130,40,143,40,174,40,184,40,129,41,142,41,174,41,184,41,129,42,141,42,173,42,184,42,129,43,139,43,171,43,184,43,129,44,138,44,170,44,183,44,129,45,137,45,170,45,182,45,129,46,136,46,169,46,181,46,130,47,135,47,168,47,180,47,130,48,134,48,167,48,179,48,130,49,133,49,166,49,178,49,131,50,132,50,165,50,177,50,165,51,176,51,164,52,174,52,162,53,173,53,162,54,172,54,160,55,171,55,159,56,170,56,156,57,169,57,147,58,168,58,139,59,140,59,143,59,166,59,139,60,165,60,138,61,163,61,137,62,162,62,136,63,160,63,135,64,157,64,134,65,153,65,134,66,151,66,133,67,149,67,132,68,148,68,133,69,146,69,133,70,144,70,134,71,141,71,180,97,180,97,187,97,194,97,184,98,195,98,161,99,161,99,178,99,178,99,181,99,197,99,205,99,209,99,161,100,161,100,170,100,176,100,180,100,198,100,203,100,210,100,160,101,164,101,171,101,174,101,179,101,183,101,189,101,196,101,198,101,211,101,159,102,166,102,178,102,183,102,190,102,196,102,203,102,211,102,158,103,167,103,177,103,183,103,189,103,196,103,202,103,212,103,158,104,168,104,176,104,184,104,188,104,196,104,202,104,212,104,157,105,172,105,176,105,196,105,201,105,213,105,156,106,196,106,200,106,213,106,156,107,169,107,174,107,195,107,200,107,214,107,155,108,168,108,175,108,214,108,155,109,168,109,176,109,215,109,155,110,168,110,177,110,194,110,200,110,215,110,154,111,168,111,177,111,193,111,201,111,215,111,154,112,167,112,178,112,191,112,201,112,215,112,154,113,166,113,179,113,189,113,202,113,215,113,154,114,166,114,169,114,170,114,181,114,187,114,203,114,214,114,154,115,165,115,168,115,168,115,204,115,214,115,154,116,163,116,167,116,168,116,205,116,213,116,154,117,161,117,206,117,212,117,154,118,160,118,208,118,212,118,154,119,155,119,211,119,211,119,154,120,155,120,174,120,175,120,194,120,195,120,210,120,210,120,245,303,249,303,244,304,247,304,249,304,249,304,242,305,247,305,240,306,246,306,249,306,249,306,238,307,246,307,237,308,247,308,235,309,247,309,234,310,243,310,248,310,248,310,233,311,242,311,232,312,241,312,231,313,239,313,250,313,251,313,253,313,253,313,230,314,237,314,251,314,251,314,253,314,253,314,230,315,237,315,247,315,254,315,229,316,236,316,245,316,255,316,125,317,128,317,227,317,235,317,244,317,256,317,124,318,130,318,227,318,234,318,243,318,257,318,124,319,131,319,226,319,234,319,242,319,258,319,124,320,132,320,225,320,233,320,241,320,259,320,125,321,133,321,225,321,233,321,240,321,252,321,258,321,260,321,127,322,134,322,225,322,232,322,239,322,251,322,259,322,262,322,128,323,135,323,224,323,232,323,238,323,250,323,259,323,262,323,129,324,135,324,224,324,232,324,238,324,249,324,258,324,262,324,120,325,122,325,130,325,136,325,227,325,231,325,237,325,248,325,257,325,262,325,117,326,123,326,131,326,136,326,225,326,225,326,228,326,231,326,237,326,248,326,256,326,262,326,116,327,124,327,132,327,137,327,229,327,231,327,237,327,247,327,255,327,262,327,114,328,125,328,132,328,137,328,230,328,231,328,236,328,246,328,254,328,260,328,113,329,126,329,133,329,138,329,228,329,232,329,236,329,245,329,253,329,259,329,113,330,127,330,133,330,138,330,231,330,233,330,236,330,245,330,253,330,259,330,113,331,127,331,134,331,138,331,233,331,234,331,236,331,245,331,252,331,258,331,116,332,128,332,134,332,138,332,234,332,244,332,252,332,258,332,118,333,129,333,134,333,138,333,235,333,244,333,251,333,258,333,119,334,129,334,134,334,138,334,236,334,243,334,251,334,258,334,118,335,130,335,134,335,138,335,237,335,243,335,250,335,258,335,114,336,114,336,119,336,130,336,134,336,134,336,138,336,138,336,238,336,243,336,249,336,258,336,120,337,130,337,134,337,134,337,138,337,138,337,239,337,243,337,249,337,258,337,121,338,130,338,137,338,137,338,240,338,243,338,248,338,258,338,122,339,130,339,241,339,243,339,248,339,259,339,122,340,131,340,242,340,244,340,248,340,256,340,258,340,258,340,122,341,130,341,243,341,245,341,248,341,255,341,122,342,130,342,244,342,245,342,247,342,254,342,122,343,130,343,245,343,253,343,122,344,129,344,246,344,252,344,122,345,128,345,246,345,252,345,258,345,259,345,115,346,115,346,122,346,127,346,247,346,252,346,114,347,116,347,122,347,127,347,248,347,251,347,114,348,117,348,122,348,126,348,249,348,251,348,113,349,118,349,122,349,125,349,249,349,251,349,112,350,118,350,122,350,124,350,113,351,119,351,122,351,124,351,113,352,119,352,122,352,123,352,114,353,119,353,122,353,122,353,115,354,119,354,121,354,121,354,115,355,121,355,115,356,120,356,115,357,120,357,115,358,119,358,116,359,119,359,116,360,118,360,116,361,118,361,116,362,118,362,116,363,117,363,116,364,117,364,"
content[2] = "156,80,158,80,162,80,163,80,210,80,210,80,152,81,152,81,154,81,163,81,209,81,217,81,142,82,142,82,145,82,163,82,209,82,218,82,135,83,162,83,209,83,219,83,131,84,162,84,209,84,225,84,130,85,162,85,209,85,231,85,130,86,162,86,209,86,232,86,130,87,162,87,208,87,232,87,130,88,162,88,208,88,237,88,130,89,162,89,208,89,239,89,130,90,161,90,208,90,240,90,129,91,161,91,208,91,240,91,129,92,161,92,208,92,240,92,129,93,161,93,208,93,239,93,128,94,161,94,208,94,238,94,128,95,160,95,208,95,238,95,128,96,160,96,207,96,240,96,128,97,161,97,207,97,240,97,127,98,161,98,207,98,240,98,127,99,161,99,207,99,240,99,127,100,161,100,208,100,239,100,128,101,162,101,208,101,240,101,129,102,160,102,210,102,241,102,131,103,158,103,212,103,240,103,131,104,157,104,212,104,239,104,134,105,156,105,213,105,239,105,135,106,156,106,213,106,240,106,135,107,155,107,213,107,239,107,137,108,155,108,214,108,238,108,137,109,154,109,214,109,237,109,138,110,154,110,214,110,236,110,140,111,154,111,214,111,236,111,142,112,154,112,213,112,236,112,143,113,154,113,213,113,235,113,146,114,154,114,213,114,234,114,147,115,154,115,213,115,233,115,149,116,154,116,212,116,233,116,154,117,155,117,210,117,232,117,210,118,229,118,212,119,227,119,211,120,222,120,210,121,221,121,209,122,217,122,209,123,216,123,208,124,214,124,207,125,213,125,206,126,212,126,206,127,211,127,207,128,209,128,179,218,198,218,163,219,214,219,156,220,218,220,149,221,218,221,144,222,218,222,141,223,218,223,137,224,219,224,228,224,231,224,137,225,220,225,227,225,234,225,137,226,220,226,227,226,236,226,135,227,220,227,229,227,239,227,124,228,124,228,132,228,219,228,230,228,241,228,123,229,124,229,133,229,219,229,231,229,243,229,122,230,124,230,126,230,126,230,136,230,218,230,231,230,245,230,120,231,125,231,137,231,218,231,232,231,246,231,118,232,125,232,138,232,218,232,233,232,247,232,116,233,124,233,139,233,218,233,221,233,221,233,233,233,248,233,115,234,123,234,139,234,218,234,234,234,250,234,114,235,122,235,139,235,218,235,234,235,251,235,113,236,121,236,139,236,218,236,234,236,252,236,111,237,120,237,138,237,217,237,234,237,253,237,110,238,120,238,125,238,125,238,138,238,217,238,235,238,254,238,109,239,119,239,125,239,125,239,138,239,217,239,221,239,221,239,235,239,255,239,108,240,118,240,137,240,218,240,235,240,255,240,107,241,118,241,137,241,218,241,235,241,256,241,106,242,118,242,137,242,218,242,235,242,256,242,105,243,118,243,136,243,218,243,235,243,256,243,104,244,117,244,135,244,218,244,235,244,256,244,104,245,117,245,135,245,218,245,228,245,228,245,235,245,256,245,103,246,117,246,134,246,219,246,227,246,228,246,235,246,256,246,102,247,117,247,120,247,120,247,133,247,219,247,226,247,227,247,234,247,256,247,102,248,118,248,121,248,121,248,132,248,220,248,234,248,256,248,102,249,118,249,130,249,221,249,233,249,256,249,101,250,118,250,129,250,222,250,232,250,255,250,101,251,119,251,127,251,224,251,231,251,255,251,101,252,255,252,102,253,254,253,102,254,254,254,102,255,254,255,103,256,253,256,103,257,253,257,104,258,253,258,104,259,252,259,104,260,252,260,105,261,252,261,105,262,251,262,105,263,251,263,106,264,250,264,106,265,250,265,106,266,249,266,107,267,249,267,107,268,248,268,107,269,248,269,108,270,247,270,108,271,247,271,108,272,246,272,109,273,246,273,110,274,246,274,110,275,245,275,111,276,245,276,111,277,245,277,112,278,245,278,113,279,244,279,113,280,244,280,114,281,243,281,115,282,243,282,115,283,242,283,116,284,242,284,117,285,242,285,118,286,241,286,119,287,137,287,148,287,241,287,120,288,136,288,141,288,144,288,151,288,241,288,121,289,135,289,138,289,241,289,122,290,240,290,124,291,240,291,125,292,240,292,126,293,240,293,128,294,241,294,129,295,242,295,132,296,243,296,132,297,244,297,131,298,245,298,131,299,248,299,130,300,249,300,130,301,250,301,129,302,253,302,129,303,252,303,128,304,252,304,127,305,242,305,245,305,251,305,127,306,240,306,246,306,246,306,249,306,251,306,125,307,238,307,126,308,237,308,125,309,235,309,124,310,234,310,123,311,233,311,122,312,176,312,187,312,232,312,121,313,173,313,191,313,231,313,120,314,171,314,198,314,230,314,119,315,169,315,200,315,230,315,248,315,249,315,118,316,167,316,202,316,229,316,117,317,166,317,204,317,228,317,116,318,124,318,128,318,164,318,206,318,228,318,116,319,123,319,129,319,163,319,208,319,227,319,123,320,124,320,131,320,161,320,209,320,226,320,132,321,160,321,211,321,226,321,129,322,129,322,133,322,159,322,213,322,225,322,134,323,157,323,214,323,225,323,135,324,156,324,215,324,226,324,135,325,155,325,217,325,226,325,136,326,154,326,218,326,225,326,137,327,153,327,219,327,225,327,137,328,152,328,220,328,225,328,137,329,151,329,221,329,225,329,133,330,133,330,137,330,150,330,222,330,225,330,139,331,148,331,139,332,147,332,139,333,146,333,139,334,145,334,139,335,144,335,139,336,143,336,139,337,142,337,139,338,140,338,139,339,139,339,"
content[3] = "208,2,212,2,209,3,213,3,223,3,225,3,209,4,213,4,222,4,226,4,209,5,214,5,221,5,227,5,209,6,214,6,220,6,227,6,209,7,214,7,219,7,227,7,209,8,214,8,219,8,227,8,209,9,214,9,218,9,226,9,209,10,214,10,218,10,226,10,210,11,214,11,217,11,225,11,210,12,215,12,217,12,225,12,211,13,230,13,212,14,229,14,207,15,207,15,212,15,229,15,206,16,229,16,208,17,229,17,206,18,228,18,205,19,227,19,205,20,225,20,204,21,224,21,204,22,221,22,204,23,208,23,210,23,221,23,204,24,206,24,210,24,222,24,210,25,222,25,210,26,222,26,209,27,215,27,217,27,223,27,209,28,214,28,217,28,223,28,209,29,214,29,217,29,223,29,209,30,213,30,217,30,222,30,210,31,212,31,218,31,221,31,210,32,211,32,219,32,220,32,"
content[4] = "280,130,283,130,280,131,283,131,278,132,284,132,274,133,285,133,271,134,286,134,268,135,287,135,266,136,288,136,264,137,288,137,262,138,289,138,74,139,75,139,256,139,290,139,72,140,79,140,252,140,290,140,71,141,82,141,249,141,291,141,70,142,90,142,245,142,292,142,69,143,98,143,242,143,292,143,69,144,126,144,213,144,213,144,237,144,292,144,68,145,147,145,213,145,214,145,232,145,293,145,67,146,147,146,213,146,214,146,227,146,293,146,67,147,147,147,213,147,214,147,223,147,293,147,66,148,147,148,213,148,214,148,218,148,283,148,288,148,290,148,293,148,293,148,66,149,147,149,213,149,281,149,65,150,147,150,213,150,278,150,65,151,147,151,213,151,275,151,64,152,147,152,213,152,273,152,64,153,147,153,213,153,270,153,64,154,147,154,213,154,267,154,64,155,147,155,213,155,265,155,64,156,147,156,213,156,262,156,67,157,70,157,75,157,147,157,213,157,260,157,82,158,146,158,213,158,257,158,86,159,145,159,214,159,255,159,93,160,144,160,214,160,252,160,97,161,144,161,214,161,251,161,101,162,144,162,171,162,186,162,211,162,211,162,214,162,249,162,104,163,143,163,169,163,187,163,189,163,190,163,211,163,211,163,215,163,246,163,106,164,143,164,170,164,191,164,215,164,245,164,110,165,143,165,168,165,192,165,215,165,243,165,115,166,143,166,167,166,193,166,215,166,242,166,119,167,142,167,166,167,193,167,216,167,240,167,120,168,142,168,165,168,195,168,216,168,239,168,123,169,142,169,147,169,147,169,164,169,192,169,194,169,203,169,210,169,210,169,217,169,237,169,126,170,141,170,162,170,192,170,196,170,210,170,217,170,235,170,128,171,141,171,159,171,193,171,198,171,205,171,208,171,210,171,217,171,234,171,131,172,141,172,148,172,152,172,156,172,194,172,197,172,210,172,217,172,233,172,133,173,140,173,147,173,159,173,163,173,180,173,183,173,194,173,196,173,210,173,218,173,231,173,135,174,140,174,147,174,160,174,163,174,177,174,186,174,194,174,196,174,211,174,218,174,230,174,136,175,140,175,146,175,175,175,187,175,211,175,218,175,228,175,138,176,139,176,146,176,174,176,188,176,211,176,218,176,227,176,146,177,173,177,188,177,212,177,219,177,226,177,146,178,172,178,188,178,212,178,219,178,224,178,146,179,171,179,181,179,181,179,188,179,212,179,219,179,223,179,146,180,171,180,181,180,181,180,188,180,212,180,219,180,222,180,147,181,170,181,180,181,181,181,188,181,212,181,219,181,221,181,146,182,170,182,180,182,181,182,187,182,213,182,146,183,170,183,187,183,213,183,145,184,170,184,186,184,213,184,147,185,171,185,186,185,213,185,147,186,172,186,184,186,213,186,148,187,174,187,182,187,214,187,148,188,214,188,148,189,214,189,148,190,214,190,148,191,214,191,148,192,214,192,148,193,214,193,148,194,214,194,148,195,214,195,148,196,214,196,148,197,214,197,148,198,178,198,184,198,214,198,148,199,176,199,186,199,214,199,148,200,174,200,189,200,214,200,148,201,173,201,190,201,214,201,148,202,172,202,191,202,214,202,147,203,171,203,190,203,213,203,147,204,170,204,190,204,213,204,147,205,170,205,189,205,213,205,147,206,170,206,188,206,213,206,147,207,172,207,186,207,213,207,146,208,174,208,184,208,213,208,146,209,213,209,146,210,213,210,146,211,213,211,146,212,213,212,145,213,213,213,145,214,213,214,145,215,213,215,145,216,213,216,145,217,214,217,145,218,214,218,145,219,214,219,145,220,165,220,198,220,214,220,145,221,159,221,209,221,214,221,145,222,153,222,214,222,214,222,145,223,149,223,145,224,145,224,"
content[5] = "151,148,151,148,150,150,150,150,209,152,209,152,147,153,148,153,210,153,210,153,147,154,148,154,146,155,148,155,213,155,214,155,146,156,148,156,213,156,214,156,146,157,148,157,212,157,214,157,145,158,148,158,212,158,214,158,145,159,148,159,211,159,214,159,145,160,148,160,211,160,215,160,144,161,148,161,211,161,215,161,144,162,148,162,210,162,215,162,143,163,148,163,210,163,216,163,143,164,148,164,210,164,216,164,143,165,149,165,209,165,216,165,142,166,150,166,209,166,217,166,141,167,148,167,208,167,217,167,140,168,148,168,209,168,217,168,140,169,148,169,209,169,217,169,140,170,148,170,209,170,218,170,140,171,149,171,208,171,218,171,140,172,149,172,207,172,218,172,139,173,150,173,207,173,208,173,210,173,219,173,139,174,147,174,149,174,150,174,210,174,219,174,138,175,147,175,150,175,150,175,211,175,219,175,138,176,147,176,211,176,219,176,139,177,147,177,211,177,220,177,139,178,147,178,211,178,220,178,138,179,146,179,211,179,220,179,138,180,146,180,212,180,221,180,138,181,146,181,212,181,221,181,137,182,146,182,212,182,221,182,137,183,146,183,212,183,220,183,137,184,144,184,147,184,147,184,212,184,220,184,136,185,144,185,147,185,148,185,212,185,220,185,136,186,144,186,147,186,148,186,213,186,220,186,136,187,143,187,147,187,148,187,213,187,220,187,136,188,143,188,213,188,221,188,135,189,143,189,213,189,221,189,135,190,142,190,213,190,221,190,135,191,142,191,213,191,221,191,135,192,142,192,212,192,221,192,134,193,142,193,212,193,221,193,134,194,142,194,212,194,222,194,134,195,142,195,212,195,222,195,134,196,142,196,212,196,222,196,133,197,141,197,213,197,222,197,133,198,141,198,213,198,222,198,133,199,141,199,213,199,223,199,133,200,141,200,213,200,223,200,133,201,140,201,212,201,223,201,132,202,140,202,212,202,224,202,132,203,140,203,213,203,213,203,215,203,224,203,132,204,139,204,213,204,213,204,215,204,224,204,132,205,139,205,212,205,213,205,215,205,224,205,131,206,139,206,212,206,213,206,215,206,224,206,131,207,139,207,212,207,213,207,215,207,225,207,131,208,139,208,213,208,213,208,216,208,225,208,131,209,139,209,213,209,213,209,216,209,225,209,130,210,139,210,212,210,213,210,216,210,225,210,130,211,138,211,212,211,213,211,216,211,225,211,130,212,138,212,212,212,213,212,216,212,225,212,129,213,138,213,213,213,213,213,216,213,226,213,129,214,138,214,216,214,226,214,128,215,138,215,217,215,226,215,128,216,138,216,217,216,226,216,128,217,137,217,217,217,227,217,128,218,137,218,145,218,145,218,217,218,227,218,127,219,137,219,217,219,227,219,127,220,137,220,217,220,227,220,127,221,137,221,216,221,228,221,127,222,136,222,216,222,228,222,126,223,136,223,218,223,228,223,126,224,138,224,218,224,231,224,125,225,137,225,218,225,221,225,225,225,229,225,125,226,136,226,218,226,220,226,227,226,229,226,125,227,135,227,218,227,220,227,124,228,135,228,218,228,219,228,123,229,130,229,133,229,136,229,218,229,219,229,123,230,128,230,136,230,136,230,123,231,127,231,123,232,125,232,123,233,124,233,123,234,123,234,128,236,128,236,275,301,275,301,267,303,268,303,268,304,269,304,267,305,269,305,267,306,271,306,267,307,272,307,274,307,274,307,267,308,275,308,267,309,275,309,267,310,275,310,267,311,275,311,267,312,275,312,267,313,275,313,267,314,275,314,266,315,275,315,112,316,112,316,265,316,275,316,109,317,113,317,265,317,275,317,108,318,112,318,265,318,275,318,104,319,112,319,265,319,275,319,103,320,112,320,265,320,275,320,102,321,112,321,265,321,275,321,102,322,111,322,265,322,275,322,102,323,111,323,263,323,263,323,265,323,275,323,101,324,110,324,262,324,275,324,101,325,111,325,261,325,275,325,101,326,111,326,260,326,275,326,100,327,111,327,259,327,275,327,100,328,111,328,258,328,275,328,100,329,110,329,258,329,275,329,100,330,112,330,258,330,274,330,100,331,112,331,258,331,274,331,100,332,111,332,257,332,274,332,276,332,276,332,100,333,110,333,257,333,274,333,276,333,276,333,100,334,110,334,257,334,274,334,276,334,276,334,100,335,113,335,118,335,118,335,258,335,274,335,276,335,276,335,100,336,114,336,258,336,273,336,100,337,114,337,257,337,273,337,100,338,115,338,256,338,273,338,100,339,115,339,256,339,273,339,275,339,276,339,100,340,115,340,256,340,256,340,258,340,273,340,275,340,276,340,100,341,115,341,259,341,273,341,275,341,275,341,100,342,115,342,254,342,254,342,260,342,272,342,100,343,115,343,253,343,253,343,260,343,272,343,101,344,115,344,259,344,272,344,274,344,275,344,101,345,115,345,259,345,272,345,274,345,275,345,101,346,115,346,258,346,272,346,274,346,275,346,101,347,114,347,116,347,116,347,257,347,271,347,274,347,274,347,102,348,113,348,256,348,271,348,273,348,273,348,101,349,112,349,251,349,251,349,255,349,270,349,273,349,273,349,101,350,112,350,251,350,252,350,254,350,270,350,272,350,273,350,102,351,113,351,252,351,269,351,272,351,274,351,102,352,113,352,252,352,268,352,273,352,273,352,103,353,114,353,252,353,268,353,103,354,114,354,252,354,267,354,104,355,114,355,252,355,267,355,270,355,271,355,105,356,114,356,252,356,266,356,269,356,269,356,106,357,115,357,252,357,265,357,268,357,268,357,107,358,115,358,252,358,264,358,107,359,115,359,253,359,263,359,267,359,267,359,108,360,115,360,253,360,263,360,107,361,115,361,117,361,118,361,253,361,262,361,107,362,117,362,254,362,262,362,109,363,117,363,254,363,261,363,109,364,117,364,255,364,261,364,109,365,117,365,255,365,260,365,264,365,264,365,109,366,117,366,255,366,260,366,263,366,263,366,109,367,117,367,257,367,259,367,262,367,262,367,109,368,116,368,258,368,259,368,109,369,116,369,259,369,260,369,109,370,115,370,109,371,114,371,109,372,113,372,109,373,112,373,109,374,110,374,100,382,102,382,"
content[6] = "215,14,219,14,215,15,219,15,214,16,219,16,214,17,219,17,214,18,219,18,214,19,219,19,213,20,219,20,215,21,217,21,169,23,174,23,169,24,174,24,168,25,174,25,166,26,174,26,164,27,174,27,162,28,174,28,160,29,174,29,158,30,174,30,156,31,174,31,154,32,174,32,153,33,174,33,151,34,174,34,150,35,176,35,147,36,176,36,147,37,176,37,145,38,176,38,144,39,176,39,142,40,176,40,141,41,175,41,139,42,174,42,138,43,173,43,137,44,173,44,137,45,172,45,136,46,171,46,135,47,169,47,134,48,169,48,133,49,168,49,132,50,167,50,132,51,165,51,132,52,164,52,132,53,163,53,133,54,162,54,134,55,161,55,135,56,160,56,136,57,159,57,137,58,156,58,138,59,152,59,139,60,145,60,138,61,140,61,153,105,157,105,168,105,173,105,167,106,175,106,169,107,176,107,195,107,195,107,200,107,201,107,169,108,176,108,194,108,201,108,168,109,177,109,193,109,201,109,168,110,177,110,192,110,201,110,168,111,178,111,191,111,202,111,167,112,180,112,189,112,203,112,166,113,203,113,165,114,204,114,164,115,167,115,169,115,203,115,162,116,166,116,170,116,198,116,200,116,204,116,158,117,168,117,171,117,197,117,201,117,205,117,207,117,212,117,156,118,169,118,172,118,196,118,199,118,212,118,155,119,169,119,174,119,194,119,199,119,211,119,155,120,170,120,173,120,195,120,198,120,210,120,156,121,171,121,175,121,193,121,197,121,209,121,156,122,171,122,173,122,173,122,177,122,191,122,197,122,209,122,156,123,171,123,179,123,189,123,194,123,194,123,197,123,208,123,210,123,210,123,157,124,172,124,182,124,187,124,196,124,207,124,158,125,172,125,196,125,207,125,159,126,172,126,195,126,206,126,159,127,172,127,190,127,190,127,195,127,207,127,160,128,173,128,194,128,205,128,207,128,207,128,163,129,173,129,193,129,204,129,165,130,173,130,191,130,191,130,193,130,203,130,166,131,174,131,176,131,176,131,191,131,202,131,167,132,176,132,190,132,201,132,168,133,177,133,190,133,201,133,166,134,166,134,169,134,178,134,189,134,200,134,170,135,179,135,186,135,199,135,170,136,180,136,184,136,198,136,171,137,197,137,171,138,197,138,170,139,195,139,170,140,195,140,197,140,197,140,170,141,194,141,170,142,194,142,170,143,194,143,197,143,198,143,148,144,153,144,161,144,161,144,170,144,194,144,199,144,199,144,211,144,213,144,147,145,153,145,170,145,194,145,200,145,203,145,212,145,213,145,147,146,153,146,157,146,157,146,170,146,194,146,206,146,206,146,211,146,214,146,147,147,153,147,166,147,166,147,168,147,168,147,171,147,193,147,206,147,206,147,210,147,214,147,147,148,152,148,167,148,168,148,171,148,193,148,200,148,206,148,209,148,214,148,147,149,151,149,167,149,168,149,171,149,192,149,200,149,206,149,209,149,215,149,147,150,150,150,165,150,166,150,172,150,191,150,200,150,206,150,209,150,215,150,147,151,147,151,163,151,167,151,173,151,191,151,200,151,205,151,209,151,215,151,147,152,147,152,163,152,168,152,174,152,189,152,193,152,195,152,200,152,204,152,209,152,215,152,148,153,148,153,154,153,159,153,163,153,169,153,175,153,188,153,192,153,196,153,210,153,215,153,153,154,160,154,163,154,170,154,178,154,186,154,190,154,196,154,212,154,214,154,153,155,160,155,163,155,170,155,175,155,175,155,188,155,195,155,212,155,213,155,152,156,160,156,163,156,169,156,175,156,175,156,177,156,179,156,183,156,184,156,188,156,195,156,199,156,201,156,212,156,212,156,152,157,160,157,164,157,168,157,173,157,174,157,177,157,179,157,187,157,194,157,197,157,203,157,212,157,212,157,152,158,159,158,171,158,174,158,177,158,179,158,186,158,186,158,188,158,193,158,197,158,203,158,212,158,212,158,154,159,159,159,171,159,174,159,197,159,204,159,208,159,212,159,154,160,158,160,170,160,174,160,176,160,176,160,181,160,181,160,196,160,203,160,206,160,211,160,155,161,157,161,162,161,165,161,170,161,174,161,176,161,176,161,196,161,202,161,206,161,211,161,161,162,166,162,169,162,173,162,180,162,182,162,186,162,186,162,192,162,194,162,197,162,201,162,205,162,211,162,160,163,166,163,170,163,172,163,190,163,195,163,205,163,211,163,158,164,166,164,170,164,172,164,178,164,178,164,188,164,196,164,205,164,211,164,149,165,149,165,158,165,166,165,169,165,170,165,189,165,196,165,205,165,210,165,149,166,151,166,158,166,169,166,190,166,196,166,200,166,203,166,206,166,210,166,149,167,152,167,159,167,167,167,190,167,196,167,199,167,203,167,207,167,210,167,149,168,153,168,159,168,166,168,191,168,191,168,194,168,205,168,209,168,209,168,149,169,154,169,160,169,166,169,191,169,192,169,196,169,204,169,149,170,154,170,160,170,165,170,192,170,192,170,198,170,205,170,149,171,154,171,161,171,161,171,164,171,165,171,198,171,205,171,149,172,153,172,164,172,165,172,179,172,184,172,192,172,192,172,199,172,206,172,150,173,152,173,155,173,155,173,177,173,187,173,204,173,206,173,149,174,154,174,175,174,187,174,193,174,193,174,150,175,152,175,173,175,188,175,150,176,152,176,173,176,189,176,173,177,189,177,172,178,189,178,171,179,189,179,171,180,189,180,170,181,189,181,170,182,188,182,170,183,188,183,170,184,187,184,171,185,186,185,172,186,185,186,173,187,184,187,174,188,182,188,177,189,181,189,180,197,182,197,178,198,188,198,176,199,189,199,174,200,190,200,173,201,191,201,172,202,191,202,171,203,191,203,170,204,191,204,170,205,191,205,170,206,190,206,171,207,189,207,172,208,188,208,175,209,186,209,177,210,184,210,220,223,228,223,220,224,228,224,220,225,229,225,219,226,230,226,131,227,135,227,217,227,231,227,129,228,136,228,217,228,231,228,127,229,137,229,217,229,232,229,126,230,138,230,217,230,233,230,124,231,139,231,217,231,233,231,123,232,139,232,217,232,234,232,122,233,139,233,217,233,234,233,121,234,140,234,217,234,235,234,120,235,140,235,217,235,235,235,120,236,140,236,217,236,235,236,120,237,139,237,217,237,236,237,119,238,139,238,217,238,236,238,119,239,139,239,217,239,236,239,118,240,139,240,217,240,236,240,117,241,138,241,217,241,236,241,117,242,130,242,132,242,137,242,217,242,236,242,117,243,129,243,132,243,137,243,217,243,236,243,117,244,129,244,131,244,136,244,217,244,236,244,117,245,136,245,217,245,223,245,225,245,236,245,117,246,119,246,121,246,135,246,217,246,226,246,228,246,236,246,117,247,119,247,121,247,134,247,218,247,224,247,228,247,236,247,117,248,120,248,124,248,134,248,218,248,235,248,117,249,133,249,218,249,235,249,117,250,132,250,220,250,234,250,117,251,130,251,221,251,234,251,117,252,129,252,222,252,233,252,118,253,127,253,223,253,231,253,121,254,124,254,224,254,224,254,228,254,230,254,"
content[7] = "153,143,154,143,154,144,159,144,206,144,213,144,155,145,161,145,205,145,213,145,155,146,163,146,194,146,196,146,205,146,214,146,154,147,165,147,194,147,198,147,204,147,213,147,152,148,165,148,193,148,200,148,206,148,210,148,213,148,213,148,147,149,147,149,150,149,166,149,193,149,199,149,206,149,209,149,213,149,213,149,147,150,165,150,167,150,167,150,193,150,199,150,205,150,209,150,213,150,213,150,147,151,163,151,168,151,172,151,192,151,199,151,204,151,209,151,213,151,213,151,147,152,163,152,169,152,173,152,192,152,192,152,195,152,210,152,213,152,214,152,147,153,163,153,170,153,175,153,190,153,191,153,195,153,214,153,147,154,154,154,159,154,163,154,170,154,180,154,184,154,185,154,187,154,190,154,195,154,214,154,147,155,153,155,159,155,163,155,170,155,188,155,195,155,214,155,148,156,153,156,159,156,164,156,169,156,176,156,179,156,188,156,194,156,214,156,149,157,153,157,159,157,176,157,179,157,188,157,193,157,198,157,202,157,214,157,149,158,153,158,159,158,197,158,203,158,214,158,150,159,153,159,159,159,171,159,175,159,197,159,203,159,212,159,214,159,214,159,149,160,155,160,158,160,171,160,175,160,196,160,203,160,208,160,211,160,211,160,149,161,170,161,175,161,197,161,202,161,207,161,149,162,161,162,165,162,170,162,174,162,179,162,183,162,206,162,210,162,210,162,149,163,160,163,165,163,171,163,173,163,206,163,149,164,159,164,166,164,172,164,178,164,184,164,186,164,191,164,195,164,205,164,149,165,159,165,166,165,170,165,189,165,192,165,196,165,206,165,209,165,209,165,149,166,159,166,166,166,169,166,190,166,191,166,196,166,210,166,151,167,159,167,165,167,168,167,190,167,190,167,194,167,200,167,202,167,210,167,153,168,160,168,165,168,167,168,191,168,191,168,194,168,199,168,204,168,210,168,154,169,162,169,165,169,167,169,191,169,192,169,196,169,199,169,204,169,210,169,154,170,162,170,165,170,166,170,192,170,192,170,198,170,201,170,205,170,210,170,154,171,161,171,164,171,165,171,192,171,193,171,198,171,200,171,202,171,210,171,153,172,159,172,164,172,164,172,192,172,192,172,198,172,199,172,202,172,210,172,152,173,159,173,205,173,208,173,210,173,210,173,152,174,157,174,159,174,159,174,152,175,154,175,211,175,211,175,211,177,211,177,219,177,219,177,"

h_content = "213,0,213,0,209,1,212,1,208,2,212,2,221,2,223,2,208,3,208,3,225,3,226,3,208,4,208,4,227,4,227,4,207,6,207,6,207,9,207,9,207,11,209,11,210,12,210,12,210,13,211,13,214,13,214,13,211,14,212,14,215,14,216,14,193,15,208,15,210,15,216,15,184,16,215,16,179,17,193,17,206,17,211,17,213,17,214,17,218,17,219,17,176,18,185,18,205,18,207,18,213,18,214,18,218,18,219,18,174,19,182,19,202,19,202,19,204,19,205,19,168,20,169,20,171,20,179,20,202,20,204,20,169,21,177,21,202,21,204,21,170,22,175,22,202,22,203,22,170,23,174,23,202,23,203,23,170,24,172,24,202,24,203,24,169,25,173,25,167,26,168,26,171,26,173,26,172,27,173,27,174,28,174,28,214,28,214,28,174,29,174,29,214,29,214,29,216,33,216,33,222,33,222,33,171,54,171,54,184,64,194,64,181,65,197,65,178,66,183,66,194,66,199,66,176,67,180,67,197,67,201,67,175,68,178,68,199,68,203,68,173,69,176,69,201,69,205,69,170,70,174,70,202,70,205,70,170,71,173,71,204,71,206,71,169,72,172,72,205,72,207,72,168,73,170,73,207,73,208,73,167,74,169,74,207,74,208,74,167,75,168,75,174,75,176,75,207,75,209,75,166,76,167,76,172,76,176,76,208,76,209,76,165,77,166,77,171,77,175,77,198,77,203,77,208,77,210,77,165,78,165,78,170,78,173,78,199,78,205,78,209,78,210,78,164,79,164,79,169,79,171,79,206,79,206,79,209,79,210,79,162,80,164,80,209,80,211,80,161,81,164,81,209,81,212,81,161,82,163,82,174,82,179,82,209,82,211,82,160,83,163,83,172,83,180,83,199,83,202,83,209,83,210,83,160,84,162,84,170,84,173,84,180,84,181,84,196,84,205,84,209,84,210,84,162,85,162,85,169,85,172,85,181,85,182,85,194,85,198,85,203,85,206,85,209,85,211,85,162,86,162,86,169,86,170,86,181,86,183,86,194,86,196,86,205,86,207,86,209,86,210,86,162,87,162,87,168,87,169,87,182,87,183,87,193,87,195,87,207,87,210,87,162,88,162,88,167,88,169,88,175,88,178,88,182,88,183,88,192,88,194,88,207,88,210,88,162,89,162,89,167,89,168,89,175,89,179,89,183,89,183,89,192,89,194,89,207,89,210,89,162,90,162,90,166,90,167,90,174,90,180,90,183,90,183,90,192,90,194,90,196,90,199,90,207,90,210,90,223,90,223,90,166,91,167,91,174,91,180,91,183,91,183,91,192,91,193,91,195,91,201,91,207,91,210,91,223,91,223,91,161,92,161,92,165,92,166,92,175,92,179,92,182,92,183,92,192,92,193,92,195,92,201,92,207,92,210,92,161,93,161,93,165,93,166,93,176,93,179,93,182,93,183,93,192,93,193,93,195,93,201,93,207,93,210,93,303,93,308,93,161,94,161,94,165,94,166,94,182,94,182,94,192,94,193,94,196,94,200,94,207,94,210,94,302,94,304,94,307,94,310,94,161,95,161,95,166,95,167,95,181,95,182,95,192,95,193,95,197,95,199,95,207,95,210,95,301,95,302,95,308,95,310,95,161,96,161,96,166,96,167,96,179,96,182,96,192,96,194,96,207,96,209,96,300,96,302,96,309,96,310,96,161,97,161,97,166,97,168,97,178,97,181,97,187,97,194,97,207,97,209,97,300,97,301,97,310,97,311,97,161,98,161,98,167,98,168,98,177,98,180,98,184,98,195,98,206,98,209,98,300,98,300,98,311,98,312,98,161,99,161,99,168,99,169,99,175,99,184,99,193,99,198,99,204,99,209,99,300,99,300,99,311,99,313,99,160,100,161,100,169,100,180,100,186,100,186,100,194,100,210,100,300,100,301,100,312,100,313,100,159,101,161,101,170,101,175,101,178,101,180,101,195,101,211,101,301,101,301,101,312,101,313,101,158,102,160,102,165,102,166,102,177,102,179,102,196,102,199,102,201,102,207,102,210,102,211,102,301,102,302,102,312,102,314,102,158,103,158,103,166,103,166,103,177,103,178,103,189,103,189,103,196,103,204,103,212,103,212,103,302,103,303,103,312,103,313,103,157,104,157,104,168,104,168,104,176,104,177,104,196,104,202,104,212,104,212,104,302,104,303,104,312,104,313,104,168,105,173,105,175,105,177,105,196,105,202,105,213,105,213,105,302,105,304,105,312,105,313,105,156,106,156,106,168,106,176,106,195,106,201,106,213,106,213,106,302,106,304,106,312,106,313,106,155,107,155,107,168,107,169,107,174,107,176,107,195,107,201,107,213,107,214,107,302,107,304,107,312,107,313,107,155,108,155,108,168,108,168,108,175,108,176,108,194,108,201,108,214,108,214,108,302,108,303,108,311,108,313,108,339,108,345,108,168,109,168,109,176,109,177,109,194,109,201,109,214,109,215,109,301,109,303,109,311,109,313,109,337,109,346,109,154,110,154,110,168,110,168,110,177,110,177,110,192,110,194,110,200,110,201,110,214,110,215,110,301,110,302,110,311,110,312,110,333,110,337,110,345,110,346,110,154,111,154,111,167,111,168,111,177,111,178,111,191,111,193,111,201,111,202,111,214,111,215,111,300,111,301,111,311,111,312,111,329,111,333,111,345,111,347,111,55,112,59,112,153,112,153,112,166,112,167,112,178,112,180,112,189,112,191,112,201,112,203,112,214,112,215,112,299,112,300,112,310,112,311,112,327,112,331,112,345,112,346,112,51,113,61,113,63,113,63,113,153,113,153,113,165,113,166,113,179,113,182,113,187,113,189,113,202,113,203,113,214,113,215,113,297,113,299,113,310,113,311,113,325,113,329,113,345,113,346,113,49,114,51,114,60,114,63,114,153,114,154,114,164,114,166,114,169,114,170,114,181,114,187,114,203,114,204,114,213,114,214,114,296,114,298,114,310,114,311,114,323,114,326,114,345,114,346,114,47,115,49,115,63,115,63,115,153,115,153,115,163,115,165,115,168,115,168,115,197,115,198,115,213,115,214,115,295,115,297,115,310,115,312,115,321,115,323,115,344,115,345,115,46,116,48,116,61,116,63,116,151,116,154,116,162,116,163,116,167,116,169,116,198,116,199,116,213,116,213,116,294,116,296,116,310,116,313,116,319,116,321,116,343,116,344,116,44,117,45,117,60,117,63,117,151,117,155,117,158,117,161,117,169,117,170,117,198,117,200,117,207,117,212,117,294,117,295,117,310,117,320,117,342,117,343,117,43,118,44,118,59,118,60,118,151,118,160,118,170,118,171,118,197,118,198,118,200,118,200,118,208,118,212,118,293,118,294,118,311,118,317,118,340,118,342,118,42,119,43,119,57,119,59,119,153,119,155,119,170,119,173,119,195,119,198,119,211,119,211,119,293,119,294,119,311,119,312,119,338,119,341,119,41,120,42,120,56,120,57,120,153,120,155,120,171,120,175,120,194,120,197,120,210,120,210,120,293,120,293,120,311,120,312,120,337,120,339,120,40,121,41,121,55,121,56,121,154,121,156,121,172,121,172,121,175,121,177,121,193,121,193,121,196,121,197,121,209,121,209,121,293,121,293,121,311,121,311,121,332,121,337,121,40,122,41,122,54,122,55,122,154,122,157,122,172,122,173,122,177,122,179,122,189,122,191,122,195,122,196,122,208,122,209,122,293,122,294,122,310,122,311,122,328,122,336,122,39,123,40,123,53,123,54,123,155,123,158,123,172,123,173,123,179,123,184,123,187,123,189,123,194,123,196,123,208,123,208,123,210,123,210,123,293,123,294,123,309,123,310,123,325,123,332,123,39,124,40,124,52,124,53,124,155,124,159,124,172,124,173,124,182,124,187,124,194,124,196,124,207,124,207,124,293,124,294,124,308,124,309,124,323,124,329,124,39,125,40,125,52,125,54,125,156,125,157,125,159,125,160,125,173,125,174,125,193,125,195,125,206,125,207,125,291,125,295,125,308,125,308,125,322,125,326,125,39,126,40,126,52,126,53,126,157,126,157,126,159,126,161,126,173,126,175,126,192,126,195,126,205,126,206,126,288,126,295,126,321,126,342,126,39,127,40,127,51,127,52,127,157,127,161,127,173,127,177,127,190,127,194,127,205,127,207,127,209,127,209,127,284,127,289,127,293,127,294,127,339,127,345,127,39,128,40,128,52,128,52,128,157,128,162,128,173,128,179,128,189,128,193,128,204,128,208,128,284,128,287,128,293,128,295,128,343,128,346,128,39,129,40,129,52,129,53,129,159,129,163,129,174,129,192,129,203,129,205,129,207,129,207,129,281,129,285,129,294,129,296,129,345,129,347,129,13,130,21,130,38,130,40,130,52,130,53,130,162,130,164,130,174,130,192,130,202,130,205,130,280,130,282,130,296,130,297,130,347,130,348,130,10,131,24,131,39,131,40,131,53,131,54,131,163,131,165,131,175,131,176,131,178,131,188,131,191,131,191,131,201,131,205,131,279,131,283,131,296,131,297,131,347,131,348,131,10,132,11,132,22,132,27,132,39,132,41,132,54,132,56,132,163,132,166,132,175,132,176,132,180,132,184,132,190,132,191,132,200,132,203,132,278,132,284,132,296,132,298,132,348,132,349,132,9,133,10,133,26,133,31,133,39,133,41,133,55,133,57,133,163,133,167,133,176,133,176,133,190,133,191,133,199,133,203,133,278,133,278,133,283,133,285,133,297,133,298,133,348,133,349,133,9,134,9,134,31,134,42,134,57,134,58,134,164,134,168,134,176,134,177,134,189,134,190,134,198,134,200,134,285,134,286,134,298,134,299,134,348,134,349,134,9,135,9,135,41,135,42,135,58,135,64,135,164,135,168,135,177,135,179,135,186,135,189,135,198,135,200,135,286,135,287,135,298,135,299,135,327,135,330,135,348,135,349,135,9,136,9,136,41,136,42,136,59,136,72,136,164,136,168,136,178,136,180,136,185,136,188,136,197,136,199,136,287,136,287,136,299,136,299,136,324,136,336,136,346,136,349,136,9,137,9,137,41,137,42,137,58,137,75,137,164,137,169,137,180,137,183,137,197,137,198,137,287,137,288,137,299,137,300,137,325,137,348,137,9,138,11,138,42,138,42,138,58,138,59,138,73,138,76,138,164,138,169,138,196,138,197,138,199,138,199,138,288,138,289,138,300,138,300,138,326,138,332,138,338,138,344,138,10,139,12,139,42,139,43,139,57,139,58,139,72,139,76,139,165,139,169,139,196,139,197,139,288,139,290,139,300,139,301,139,329,139,331,139,11,140,14,140,43,140,44,140,56,140,57,140,71,140,79,140,165,140,169,140,196,140,197,140,289,140,290,140,300,140,301,140,331,140,332,140,13,141,21,141,44,141,48,141,55,141,56,141,70,141,77,141,161,141,169,141,195,141,200,141,289,141,291,141,301,141,301,141,332,141,335,141,17,142,24,142,30,142,30,142,54,142,55,142,70,142,70,142,160,142,169,142,195,142,201,142,290,142,292,142,301,142,302,142,305,142,311,142,333,142,337,142,21,143,31,143,54,143,54,143,69,143,69,143,154,143,155,143,158,143,169,143,195,143,204,143,291,143,292,143,301,143,315,143,336,143,337,143,11,144,27,144,53,144,53,144,68,144,69,144,154,144,169,144,195,144,207,144,291,144,292,144,301,144,302,144,314,144,320,144,337,144,339,144,10,145,19,145,43,145,44,145,52,145,53,145,67,145,68,145,154,145,169,145,195,145,207,145,291,145,292,145,301,145,302,145,319,145,322,145,338,145,339,145,6,146,7,146,41,146,43,146,51,146,52,146,67,146,67,146,154,146,154,146,157,146,169,146,194,146,205,146,287,146,293,146,301,146,303,146,322,146,324,146,338,146,340,146,41,147,42,147,51,147,52,147,66,147,67,147,153,147,153,147,160,147,170,147,194,147,206,147,287,147,293,147,302,147,303,147,323,147,327,147,339,147,340,147,3,148,3,148,50,148,51,148,65,148,66,148,152,148,152,148,162,148,170,148,193,148,200,148,287,148,294,148,302,148,303,148,325,148,329,148,339,148,341,148,2,149,2,149,50,149,50,149,65,149,66,149,150,149,151,149,164,149,170,149,193,149,199,149,288,149,294,149,302,149,303,149,328,149,331,149,339,149,341,149,2,150,2,150,50,150,50,150,64,150,66,150,149,150,150,150,164,150,165,150,167,150,171,150,192,150,194,150,198,150,199,150,289,150,294,150,297,150,300,150,302,150,303,150,329,150,333,150,340,150,341,150,2,151,2,151,33,151,33,151,49,151,50,151,64,151,65,151,168,151,172,151,191,151,194,151,199,151,199,151,289,151,295,151,297,151,297,151,300,151,300,151,302,151,304,151,331,151,340,151,2,152,4,152,31,152,32,152,49,152,49,152,63,152,65,152,169,152,173,152,190,152,192,152,195,152,195,152,290,152,295,152,297,152,297,152,303,152,304,152,334,152,340,152,3,153,5,153,29,153,31,153,49,153,49,153,63,153,64,153,170,153,175,153,188,153,191,153,195,153,195,153,290,153,295,153,297,153,298,153,300,153,300,153,303,153,304,153,4,154,7,154,26,154,29,154,48,154,49,154,62,154,66,154,171,154,171,154,174,154,180,154,184,154,190,154,291,154,295,154,297,154,300,154,303,154,304,154,8,155,11,155,24,155,27,155,45,155,48,155,62,155,74,155,170,155,170,155,175,155,188,155,291,155,295,155,302,155,304,155,11,156,25,156,43,156,48,156,61,156,75,156,152,156,152,156,176,156,176,156,180,156,180,156,183,156,188,156,292,156,295,156,300,156,304,156,20,157,24,157,40,157,43,157,47,157,48,157,61,157,71,157,73,157,75,157,152,157,152,157,179,157,179,157,185,157,188,157,292,157,295,157,297,157,301,157,19,158,20,158,38,158,41,158,47,158,47,158,60,158,69,158,152,158,152,158,203,158,203,158,293,158,300,158,17,159,19,159,37,159,40,159,46,159,47,159,60,159,68,159,293,159,298,159,15,160,17,160,35,160,38,160,46,160,47,160,59,160,68,160,14,161,15,161,34,161,37,161,45,161,47,161,59,161,67,161,164,161,164,161,170,161,170,161,12,162,13,162,33,162,35,162,45,162,47,162,59,162,66,162,10,163,12,163,31,163,34,163,45,163,46,163,51,163,52,163,58,163,65,163,10,164,10,164,29,164,32,164,45,164,46,164,49,164,53,164,58,164,65,164,8,165,9,165,27,165,30,165,44,165,46,165,49,165,49,165,53,165,53,165,58,165,63,165,7,166,8,166,25,166,29,166,44,166,45,166,48,166,49,166,52,166,53,166,57,166,63,166,7,167,7,167,22,167,26,167,43,167,45,167,48,167,51,167,57,167,62,167,7,168,7,168,18,168,24,168,43,168,44,168,57,168,61,168,7,169,20,169,43,169,44,169,57,169,60,169,8,170,18,170,42,170,43,170,57,170,59,170,11,171,13,171,42,171,45,171,56,171,59,171,43,172,49,172,56,172,58,172,47,173,58,173,52,174,57,174,278,271,286,271,277,272,289,272,276,273,276,273,287,273,291,273,273,274,273,274,290,274,294,274,272,275,272,275,289,275,297,275,271,276,271,276,287,276,299,276,269,277,270,277,287,277,292,277,297,277,300,277,269,278,270,278,286,278,291,278,298,278,300,278,268,279,269,279,285,279,290,279,299,279,301,279,268,280,268,280,284,280,289,280,299,280,301,280,267,281,268,281,284,281,288,281,300,281,301,281,94,282,99,282,266,282,267,282,283,282,287,282,300,282,301,282,93,283,100,283,266,283,267,283,282,283,286,283,301,283,302,283,92,284,93,284,99,284,101,284,266,284,267,284,282,284,286,284,301,284,302,284,91,285,91,285,100,285,104,285,265,285,266,285,281,285,285,285,301,285,302,285,90,286,90,286,101,286,108,286,265,286,266,286,281,286,284,286,301,286,302,286,89,287,90,287,101,287,104,287,106,287,110,287,116,287,119,287,265,287,266,287,280,287,281,287,283,287,284,287,302,287,302,287,88,288,89,288,102,288,104,288,108,288,111,288,118,288,120,288,265,288,266,288,280,288,281,288,283,288,283,288,302,288,302,288,87,289,88,289,102,289,105,289,110,289,112,289,119,289,120,289,265,289,266,289,279,289,280,289,283,289,283,289,302,289,302,289,87,290,88,290,102,290,103,290,105,290,105,290,111,290,113,290,120,290,121,290,265,290,265,290,279,290,280,290,282,290,282,290,302,290,302,290,86,291,87,291,102,291,103,291,105,291,105,291,112,291,114,291,121,291,121,291,265,291,265,291,278,291,279,291,282,291,282,291,302,291,302,291,85,292,86,292,103,292,103,292,105,292,105,292,113,292,115,292,120,292,125,292,265,292,265,292,278,292,279,292,282,292,282,292,302,292,302,292,85,293,86,293,103,293,103,293,105,293,105,293,114,293,115,293,124,293,127,293,265,293,265,293,278,293,279,293,281,293,282,293,302,293,302,293,85,294,85,294,103,294,103,294,105,294,105,294,114,294,116,294,127,294,127,294,265,294,265,294,277,294,278,294,281,294,282,294,302,294,302,294,84,295,84,295,103,295,103,295,105,295,105,295,115,295,117,295,265,295,265,295,277,295,278,295,281,295,282,295,84,296,84,296,103,296,103,296,105,296,105,296,115,296,118,296,265,296,266,296,277,296,278,296,280,296,282,296,83,297,83,297,102,297,103,297,105,297,105,297,116,297,118,297,265,297,266,297,277,297,277,297,280,297,282,297,83,298,83,298,102,298,103,298,105,298,105,298,117,298,118,298,265,298,266,298,276,298,277,298,280,298,281,298,294,298,294,298,82,299,82,299,102,299,103,299,105,299,105,299,117,299,118,299,265,299,266,299,276,299,276,299,280,299,281,299,295,299,295,299,81,300,82,300,102,300,103,300,105,300,105,300,117,300,119,300,265,300,266,300,275,300,276,300,280,300,281,300,295,300,295,300,302,300,302,300,81,301,82,301,102,301,103,301,105,301,105,301,118,301,119,301,249,301,252,301,275,301,276,301,280,301,281,301,292,301,292,301,295,301,295,301,302,301,302,301,81,302,81,302,102,302,103,302,105,302,105,302,118,302,119,302,250,302,254,302,266,302,266,302,275,302,276,302,280,302,281,302,293,302,293,302,295,302,295,302,302,302,302,302,80,303,81,303,102,303,103,303,105,303,105,303,118,303,119,303,246,303,255,303,275,303,276,303,279,303,280,303,290,303,290,303,293,303,293,303,295,303,295,303,302,303,302,303,80,304,81,304,101,304,102,304,105,304,105,304,118,304,119,304,244,304,255,304,266,304,266,304,268,304,269,304,275,304,276,304,279,304,280,304,289,304,289,304,293,304,293,304,295,304,295,304,302,304,302,304,80,305,80,305,101,305,102,305,105,305,105,305,118,305,119,305,242,305,243,305,245,305,255,305,268,305,269,305,274,305,275,305,279,305,280,305,289,305,289,305,293,305,293,305,295,305,295,305,302,305,302,305,79,306,80,306,101,306,102,306,105,306,105,306,118,306,118,306,240,306,240,306,246,306,255,306,265,306,266,306,274,306,275,306,278,306,280,306,289,306,289,306,292,306,293,306,295,306,295,306,302,306,302,306,79,307,79,307,101,307,102,307,105,307,105,307,118,307,118,307,238,307,238,307,247,307,255,307,265,307,266,307,271,307,272,307,274,307,275,307,278,307,280,307,292,307,292,307,301,307,302,307,79,308,79,308,101,308,102,308,105,308,105,308,117,308,118,308,236,308,237,308,247,308,254,308,265,308,266,308,272,308,272,308,274,308,275,308,278,308,280,308,288,308,288,308,301,308,302,308,79,309,79,309,101,309,102,309,105,309,105,309,117,309,117,309,235,309,236,309,243,309,254,309,265,309,265,309,274,309,275,309,278,309,279,309,288,309,288,309,294,309,294,309,301,309,302,309,101,310,101,310,104,310,105,310,116,310,117,310,234,310,235,310,242,310,243,310,248,310,254,310,265,310,265,310,274,310,275,310,278,310,279,310,288,310,288,310,294,310,294,310,301,310,303,310,101,311,101,311,104,311,105,311,116,311,117,311,233,311,234,311,241,311,242,311,249,311,253,311,265,311,266,311,274,311,274,311,278,311,279,311,289,311,289,311,293,311,293,311,301,311,302,311,100,312,101,312,104,312,105,312,115,312,116,312,120,312,120,312,232,312,233,312,239,312,240,312,250,312,253,312,265,312,266,312,274,312,274,312,278,312,279,312,289,312,289,312,293,312,293,312,301,312,302,312,100,313,100,313,104,313,104,313,114,313,115,313,120,313,121,313,231,313,232,313,238,313,239,313,250,313,254,313,265,313,266,313,274,313,274,313,278,313,279,313,289,313,289,313,291,313,292,313,300,313,301,313,100,314,100,314,114,314,115,314,119,314,120,314,230,314,231,314,237,314,237,314,251,314,254,314,264,314,266,314,274,314,274,314,278,314,279,314,300,314,301,314,99,315,100,315,113,315,114,315,118,315,119,315,194,315,194,315,229,315,230,315,236,315,237,315,248,315,255,315,266,315,267,315,274,315,274,315,278,315,279,315,300,315,301,315,99,316,100,316,112,316,113,316,117,316,118,316,228,316,229,316,235,316,236,316,245,316,249,316,253,316,256,316,267,316,267,316,274,316,274,316,278,316,278,316,299,316,300,316,77,317,77,317,98,317,99,317,111,317,112,317,116,317,124,317,127,317,128,317,228,317,228,317,235,317,235,317,244,317,245,317,255,317,258,317,268,317,268,317,274,317,274,317,278,317,278,317,299,317,300,317,77,318,77,318,98,318,99,318,111,318,112,318,115,318,123,318,128,318,130,318,227,318,228,318,234,318,234,318,243,318,244,318,256,318,258,318,274,318,274,318,278,318,278,318,299,318,300,318,77,319,77,319,98,319,99,319,102,319,102,319,111,319,112,319,115,319,123,319,130,319,131,319,226,319,227,319,233,319,234,319,242,319,242,319,255,319,259,319,269,319,269,319,274,319,274,319,278,319,278,319,298,319,299,319,98,320,99,320,102,320,102,320,104,320,105,320,111,320,112,320,115,320,122,320,132,320,132,320,226,320,226,320,233,320,233,320,241,320,241,320,253,320,260,320,274,320,274,320,277,320,278,320,298,320,299,320,97,321,99,321,102,321,102,321,111,321,112,321,115,321,122,321,126,321,126,321,133,321,133,321,225,321,226,321,232,321,233,321,240,321,240,321,252,321,252,321,258,321,261,321,264,321,264,321,274,321,274,321,277,321,278,321,298,321,298,321,76,322,76,322,97,322,98,322,102,322,102,322,111,322,111,322,115,322,121,322,128,322,128,322,133,322,134,322,225,322,225,322,231,322,232,322,240,322,240,322,251,322,251,322,259,322,264,322,274,322,274,322,277,322,278,322,297,322,298,322,76,323,76,323,97,323,98,323,102,323,102,323,111,323,111,323,115,323,120,323,128,323,129,323,135,323,135,323,224,323,225,323,231,323,232,323,239,323,239,323,249,323,250,323,259,323,264,323,274,323,274,323,277,323,278,323,297,323,298,323,76,324,76,324,97,324,98,324,110,324,110,324,115,324,118,324,129,324,130,324,135,324,135,324,224,324,226,324,231,324,232,324,238,324,238,324,248,324,249,324,258,324,265,324,274,324,274,324,277,324,278,324,296,324,297,324,76,325,76,325,96,325,97,325,101,325,101,325,110,325,111,325,115,325,118,325,130,325,130,325,136,325,136,325,224,325,227,325,231,325,231,325,237,325,237,325,247,325,248,325,257,325,265,325,274,325,274,325,277,325,278,325,296,325,297,325,76,326,76,326,96,326,97,326,101,326,101,326,109,326,109,326,111,326,111,326,115,326,116,326,136,326,136,326,223,326,228,326,231,326,231,326,237,326,237,326,247,326,248,326,256,326,257,326,259,326,264,326,274,326,274,326,277,326,278,326,295,326,296,326,76,327,76,327,96,327,97,327,111,327,111,327,115,327,115,327,123,327,123,327,137,327,137,327,221,327,221,327,223,327,229,327,231,327,231,327,237,327,237,327,246,327,247,327,255,327,256,327,259,327,261,327,263,327,263,327,273,327,274,327,277,327,278,327,295,327,296,327,76,328,76,328,96,328,97,328,106,328,106,328,137,328,137,328,221,328,231,328,236,328,236,328,246,328,246,328,254,328,255,328,258,328,260,328,273,328,274,328,277,328,277,328,294,328,295,328,76,329,76,329,95,329,97,329,105,329,105,329,133,329,133,329,137,329,138,329,149,329,149,329,221,329,232,329,236,329,236,329,245,329,245,329,254,329,254,329,258,329,259,329,273,329,274,329,277,329,277,329,294,329,295,329,76,330,77,330,95,330,97,330,100,330,100,330,113,330,113,330,138,330,138,330,148,330,148,330,220,330,228,330,230,330,233,330,236,330,236,330,245,330,245,330,253,330,253,330,258,330,259,330,263,330,263,330,267,330,267,330,273,330,274,330,277,330,277,330,293,330,294,330,76,331,77,331,95,331,96,331,100,331,100,331,110,331,111,331,138,331,138,331,147,331,147,331,223,331,224,331,232,331,234,331,236,331,236,331,244,331,244,331,252,331,253,331,258,331,258,331,263,331,263,331,273,331,274,331,277,331,277,331,292,331,294,331,76,332,77,332,95,332,96,332,100,332,100,332,134,332,134,332,138,332,138,332,233,332,237,332,244,332,244,332,252,332,252,332,258,332,258,332,263,332,263,332,273,332,274,332,277,332,277,332,292,332,293,332,77,333,77,333,95,333,96,333,100,333,100,333,109,333,109,333,134,333,134,333,138,333,138,333,234,333,237,333,243,333,244,333,251,333,251,333,257,333,258,333,263,333,263,333,273,333,274,333,276,333,277,333,291,333,292,333,77,334,78,334,95,334,96,334,100,334,100,334,109,334,109,334,118,334,118,334,129,334,129,334,134,334,134,334,138,334,138,334,235,334,237,334,243,334,243,334,251,334,251,334,257,334,258,334,263,334,263,334,273,334,274,334,276,334,277,334,290,334,292,334,78,335,78,335,95,335,96,335,100,335,100,335,108,335,113,335,129,335,130,335,134,335,134,335,138,335,138,335,237,335,238,335,243,335,243,335,250,335,250,335,258,335,258,335,273,335,274,335,276,335,277,335,290,335,291,335,78,336,79,336,95,336,96,336,110,336,110,336,112,336,114,336,129,336,130,336,134,336,138,336,238,336,239,336,243,336,243,336,249,336,250,336,258,336,258,336,273,336,273,336,276,336,277,336,289,336,290,336,79,337,80,337,95,337,96,337,113,337,114,337,129,337,130,337,134,337,138,337,140,337,141,337,239,337,240,337,243,337,243,337,249,337,250,337,258,337,258,337,273,337,273,337,276,337,277,337,288,337,290,337,80,338,81,338,95,338,96,338,114,338,114,338,129,338,130,338,134,338,141,338,240,338,243,338,249,338,249,338,256,338,258,338,276,338,277,338,288,338,289,338,80,339,81,339,95,339,96,339,109,339,109,339,129,339,130,339,133,339,141,339,241,339,243,339,248,339,249,339,256,339,256,339,275,339,277,339,287,339,288,339,80,340,82,340,95,340,96,340,115,340,115,340,129,340,141,340,241,340,244,340,248,340,249,340,255,340,256,340,259,340,259,340,272,340,272,340,275,340,276,340,286,340,288,340,81,341,83,341,95,341,97,341,115,341,115,341,129,341,137,341,242,341,244,341,248,341,249,341,254,341,254,341,272,341,272,341,275,341,276,341,286,341,287,341,83,342,84,342,96,342,97,342,115,342,115,342,130,342,135,342,243,342,245,342,248,342,248,342,254,342,254,342,260,342,260,342,272,342,272,342,275,342,276,342,285,342,286,342,83,343,85,343,96,343,97,343,100,343,100,343,115,343,115,343,129,343,130,343,244,343,248,343,253,343,253,343,260,343,260,343,271,343,272,343,275,343,276,343,284,343,286,343,84,344,86,344,96,344,97,344,100,344,100,344,115,344,115,344,122,344,122,344,130,344,130,344,245,344,248,344,259,344,260,344,271,344,272,344,274,344,276,344,284,344,285,344,86,345,87,345,96,345,98,345,100,345,100,345,115,345,115,345,122,345,122,345,129,345,129,345,246,345,248,345,252,345,252,345,259,345,259,345,271,345,272,345,274,345,275,345,283,345,284,345,87,346,89,346,97,346,98,346,114,346,115,346,128,346,128,346,246,346,249,346,251,346,252,346,270,346,272,346,274,346,275,346,283,346,285,346,88,347,90,347,97,347,98,347,101,347,101,347,126,347,126,347,245,347,245,347,247,347,251,347,257,347,258,347,270,347,271,347,274,347,275,347,282,347,285,347,89,348,91,348,97,348,98,348,101,348,101,348,128,348,128,348,248,348,251,348,256,348,257,348,270,348,271,348,273,348,274,348,281,348,287,348,91,349,92,349,98,349,99,349,101,349,102,349,126,349,126,349,249,349,251,349,255,349,256,349,269,349,270,349,273,349,289,349,92,350,92,350,98,350,99,350,101,350,102,350,112,350,112,350,124,350,125,350,127,350,127,350,250,350,250,350,254,350,255,350,269,350,270,350,272,350,277,350,281,350,289,350,92,351,93,351,98,351,99,351,102,351,102,351,112,351,112,351,123,351,124,351,251,351,251,351,253,351,254,351,268,351,269,351,272,351,288,351,92,352,94,352,99,352,100,352,102,352,103,352,113,352,113,352,253,352,253,352,268,352,268,352,273,352,279,352,284,352,287,352,91,353,95,353,99,353,100,353,113,353,113,353,119,353,119,353,123,353,123,353,253,353,253,353,273,353,277,353,284,353,286,353,90,354,91,354,94,354,95,354,100,354,101,354,104,354,104,354,114,354,114,354,119,354,119,354,122,354,122,354,267,354,267,354,272,354,275,354,283,354,285,354,89,355,90,355,96,355,97,355,100,355,101,355,104,355,105,355,114,355,114,355,266,355,267,355,270,355,272,355,283,355,284,355,89,356,90,356,97,356,98,356,101,356,102,356,105,356,105,356,114,356,114,356,120,356,121,356,265,356,266,356,269,356,271,356,282,356,283,356,90,357,91,357,98,357,99,357,101,357,102,357,105,357,106,357,114,357,114,357,119,357,120,357,264,357,265,357,268,357,270,357,281,357,282,357,90,358,90,358,93,358,93,358,99,358,103,358,106,358,106,358,115,358,115,358,119,358,120,358,263,358,264,358,268,358,269,358,280,358,282,358,90,359,90,359,94,359,95,359,101,359,103,359,106,359,107,359,115,359,115,359,252,359,253,359,263,359,263,359,268,359,268,359,279,359,281,359,95,360,97,360,102,360,104,360,107,360,107,360,118,360,119,360,252,360,253,360,262,360,263,360,267,360,267,360,279,360,280,360,97,361,97,361,104,361,105,361,107,361,108,361,119,361,119,361,253,361,254,361,266,361,266,361,278,361,280,361,99,362,99,362,103,362,105,362,108,362,108,362,117,362,117,362,253,362,254,362,261,362,261,362,265,362,266,362,277,362,279,362,100,363,105,363,108,363,108,363,116,363,118,363,265,363,265,363,276,363,278,363,100,364,102,364,108,364,109,364,116,364,119,364,254,364,255,364,260,364,260,364,265,364,265,364,275,364,277,364,91,365,91,365,100,365,101,365,108,365,109,365,116,365,117,365,259,365,260,365,264,365,264,365,274,365,277,365,91,366,91,366,101,366,101,366,109,366,109,366,116,366,117,366,256,366,256,366,259,366,260,366,263,366,264,366,273,366,276,366,91,367,91,367,101,367,102,367,109,367,109,367,116,367,117,367,255,367,256,367,258,367,259,367,262,367,263,367,273,367,275,367,91,368,91,368,101,368,102,368,109,368,109,368,116,368,117,368,257,368,259,368,262,368,263,368,272,368,274,368,92,369,92,369,102,369,102,369,109,369,109,369,117,369,117,369,258,369,260,369,262,369,263,369,269,369,272,369,92,370,92,370,102,370,103,370,109,370,109,370,116,370,116,370,259,370,263,370,267,370,271,370,92,371,93,371,102,371,103,371,109,371,109,371,115,371,115,371,260,371,269,371,92,372,93,372,103,372,103,372,109,372,109,372,112,372,112,372,114,372,114,372,262,372,267,372,93,373,94,373,103,373,103,373,109,373,110,373,113,373,113,373,94,374,94,374,103,374,103,374,109,374,111,374,94,375,94,375,103,375,103,375,109,375,110,375,95,376,95,376,103,376,104,376,108,376,109,376,95,377,96,377,103,377,104,377,106,377,109,377,96,378,97,378,103,378,108,378,96,379,98,379,103,379,106,379,97,380,99,380,102,380,105,380,98,381,103,381,99,382,102,382,"
Timer.Interval = 100
Timer.Tick = CallHyperThread


color = "1=red;2=lime;3=purple;4=cyan;5=brown;6=yellow;7=magenta"

For i = 1 To Array.GetItemCount(color)
  j = 0
  While content[i] <> ""
    j = j + 1
    comma = Text.GetIndexOf(content[i], ",")
    x_1[j] = Text.GetSubText(content[i], 1, comma - 1)
    content[i] = Text.GetSubTextToEnd(content[i], comma + 1)

    comma = Text.GetIndexOf(content[i], ",")
    y_1[j] = Text.GetSubText(content[i], 1, comma - 1)
    content[i] = Text.GetSubTextToEnd(content[i], comma + 1)

    comma = Text.GetIndexOf(content[i], ",")
    x_2[j] = Text.GetSubText(content[i], 1, comma - 1)
    content[i] = Text.GetSubTextToEnd(content[i], comma + 1)

    comma = Text.GetIndexOf(content[i], ",")
    y_2[j] = Text.GetSubText(content[i], 1, comma - 1)
    content[i] = Text.GetSubTextToEnd(content[i], comma + 1)
  EndWhile

  GraphicsWindow.PenWidth = 1
  GraphicsWindow.PenColor = color[i]
  For k = 1 To Array.GetItemCount(x_1)
    GraphicsWindow.DrawLine(x_1[k], y_1[k], x_2[k], y_2[k])
  EndFor
  x_1 = ""
  y_1 = ""
  x_2 = ""
  y_2 = ""
EndFor
uiAvailable = "True"

message = Shapes.AddText("")
While uiAvailable <> "True" Or hyperComplete <> "True"
  Shapes.SetText(message, "Wait for black! " + percentComplete + "% completed.")
  Program.Delay(15)
EndWhile

If hyperComplete And uiAvailable Then
  GraphicsWindow.PenColor = "black"
  For k = 1 To Array.GetItemCount(h_x_1)
    GraphicsWindow.DrawLine(h_x_1[k], h_y_1[k], h_x_2[k], h_y_2[k])
  EndFor
  Shapes.HideShape(message)
EndIf


Sub CallHyperThread
  Timer.Pause()
  totalContent = Text.GetLength(h_content)

  h_j = 0
  While h_content <> ""
    h_j = h_j + 1
    h_comma = Text.GetIndexOf(h_content, ",")
    h_x_1[h_j] = Text.GetSubText(h_content, 1, h_comma - 1)
    h_content = Text.GetSubTextToEnd(h_content, h_comma + 1)

    h_comma = Text.GetIndexOf(h_content, ",")
    h_y_1[h_j] = Text.GetSubText(h_content, 1, h_comma - 1)
    h_content = Text.GetSubTextToEnd(h_content, h_comma + 1)

    h_comma = Text.GetIndexOf(h_content, ",")
    h_x_2[h_j] = Text.GetSubText(h_content, 1, h_comma - 1)
    h_content = Text.GetSubTextToEnd(h_content, h_comma + 1)

    h_comma = Text.GetIndexOf(h_content, ",")
    h_y_2[h_j] = Text.GetSubText(h_content, 1, h_comma - 1)
    h_content = Text.GetSubTextToEnd(h_content, h_comma + 1)

    percentComplete = Math.Round((totalContent - Text.GetLength(h_content)) / totalContent * 100)
  EndWhile
  hyperComplete = "True"
EndSub
Copyright (c) Microsoft Corporation. All rights reserved.