Rechercher dans ce blog

mercredi 29 décembre 2021

ProgressbarAvion

 voici comment faire un progressbarAvion.

dans la class progressbarAvion, vous pouvez changer de couleur rectangle, drawline, l'avion :

 Public Class ProgressbarAvion : Inherits ProgressBar

    Private _ColorRectangle As Color
    Public Property ColorRectangle As Color
        Get
            Return _ColorRectangle
        End Get
        Set(value As Color)
            If value = Color.Transparent Then
                Return
            Else
                _ColorRectangle = value
                Me.Invalidate()
            End If
        End Set
    End Property

    Private _ColorPiste As Color
    Public Property ColorPiste As Color
        Get
            Return _ColorPiste
        End Get
        Set(value As Color)
            If value = Color.Transparent Then
                Return
            Else
                _ColorPiste = value
                Me.Invalidate()
            End If
        End Set
    End Property

    Private _ColorAvion As Color
    Public Property ColorAvion As Color
        Get
            Return _ColorAvion
        End Get
        Set(value As Color)
            _ColorAvion = value
            Me.Invalidate()
        End Set
    End Property

    Private _Avion As String = "iVBORw0KGgoAAAANSUhEUgAAAfQAAAG9CAYAAADjgYQuAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8YQUAAAAJcEhZcwAACxIAAAsSAdLdfvwAAHpBSURBVHhe7b13e1THtu67PsGxyTlHoZwTIudowCYaMBgbY4yzjQM529heXsFrORKVI5KQkEAgcjQOe5+wz7nnufejjFtvzS717O5qqSUUOrx//J5Wj25Js8acVW+FUaP+IiKEEEIIiXCsRkIIIYREFlYjIYQQQiILq5EQQgghkYXVSAghhJDIwmokhBBCSGRhNRISqfz+xT/k5hsfyuXVW6V63mqpnrNKLs1eJTUzV0rdzBVSnb9EqnIWSWX2Yk1F1oI2yjPnS1nWfCnPVj/nLZGy3MVSmrNASnIXqNdF+r0Bn4OqgqVSgb87f4369/ZrIoSQ3sBqJCTSuHvqWyl9cZucS5klFZNzpW5spjSOSpOmkanSbGNEmoO/3fM7+N0G/ZoqDaOd926ujE73vKZJvfr88rgMqZyQKcVT8uRM2mx1SfbrJISQnsJqJCSSaHnnUylMnSNV47OVGGfIjSGpckdxb2CS3Pfj3qAEjf97fPfugESf9/cHJeuf73jea1yfm/d3Byeq/5csrUNS5NqwFC32lyZkSVFCgbo8+zUTQkh3YzUSEilc2fm+XEwskAY1Wr49OEkeDEiSJwOS5dd+CfL0eQv9pjm43w+Il9/6Jerf+a1/vH6Pz/TfUJ//2t/v+57f9/m8f6I87p8gjwY4nQVcC0b85ZOy5ELBUqnfe1Bdrr0MhBDSHViNhEQCVz85IoVJM6RhZIoWUIipFmUlzhDc3zTTAmgTZRfG3vb5c3EBdn+M/dfnne8C/IxrwLVgZI8Re9X4TCmavlRaPjmqLtteFkIIeVasRkIigZ9yF0jdmDS5PxijYyWuanTtFdzggg6MAP/eL15j+47N/sdzDua9/3fQEdCv6m/jmh4oYW8ZqkR9Yo6Uz18jDYdOqUu3l4cQQp4Fq5GQcKd5626pmpwtrcOS5QmmyJWAuoUV+Iqtv8BDeB3xBUao/QXbi/l9X0zHwP/vAf1Z/0S91o6ResXUPLm0cac0nPhKFcFeLkII6SpWIyHhTnH6HLk2Uo3OBzqi6hZSI+TtCzroTkEHvoKu6eesrUPUESx3MWWmXH3vM1UEe7kIIaSrWI2EhDMPT/9DytRot3WIs24eKKbGFogJbDPvgwt4aPj/PRv4HKKO60X0e83SdVJ7hFPvhJDuxWokJJy5vvewnm5H0BmE0hFOI+gJamSe6Pk5EC3ALsHvFkF3/b1g4DuIfr86IlVK4/Ol4Z1PVVHs5SOEkK5gNRISzjS/t0+qJmbpPeA6qt1HPPG++wS7s/hOwXtBJ+PJgETVCUmSurHpUrpgjTQdPKGKYy8jIYR0FquRkHAG27+qJuVqcfSO0A3hJeje9XxnKx2WCFqGp0rR1Dxp3PGuKo69jIQQ0lmsRkLCmbun/67X0G961tAdAfUVcu/7YHbz/lnx/XsBI3RspfNsp4MdSWjuDk6W+tEZUlmwQi7vO66KZC8nIYR0BquRkHCnNG2OHulin3fHgm5stu89K4F/zy3oRuAxUtejdSXuuOYbQ1OkfFKOXHplt1QfP62KZC8nIYSEitVISLjTsGSjNI5O19PuJgWrW1R7G++0PoLzArevubfQIeEMtrFdHpMuF7MXSO3be+XsIY7UCSHPhtVISLhz982P9To6DkTBOnpwQbcLbHfju1bf/v/Dteq19GFJOtd71aqXpXjvflUse1kJISQUrEZCwp3/+Opf+qjUphEpWhz1ASkuUe/tYLhg0/jukblOC4vDX9R14gAYROnjeNaS1NlS9daHHKUTQp4Jq5GQSODC/BekdnSqzhbnP0rvG0HveG1ei7mHxwMTdWAfDm8pXbFRSjlKJ4Q8A1YjIZFA7Y63pXpCVluCGZPgxT0qNkL7x3MOXnvfg1mFB4MSpWlkqlxMmiF1r78rJSe/VEWzl5cQQtrDaiQkEmg98qVPClh7xrbwFXQ9SlcdEVw/RunlC1bLpf3HVNHs5SWEkPawGgmJFErT5+rtaw8HJrZNuZsjTB0cQfe+7xuczoZzHc5SgNMBwSgda+lICVuWMF3q3vxIFcteVkIIaQ+rkZBIoeGFLTqVqt6+psSxTUDbRD18BV3TP14eDZimlw0ujUuXwgUvyqXPj6qi2ctLCCHBsBoJiRRufrBfCqflSstQ3+1rzgEtSjCfS/KIp5/AegLT/O2dxyPMnvf+fzeU/4OOCGYYmoenSHF8gTS8+o6UH+FaOiGkc1iNhEQSP6bOlMZRaUoUk/VI2AmKM0LrK7iGUIQ2NHz/vv/fDeX/4HMkx7kzJFnqRmdI+YwVUvvJQVU0e3kJIcSG1UhIJHF+6XqpHZMhDwYle05fcwTWN9rdH18h7iodCXbg5+b/+oLvICUsZhrKp+RK7dbdUnGY+9IJIaFjNRISSdTu+lCqJuboQ08w7d7eeehejJjaPgud7hJ0fGYC5JAStjBvkTR8uE8unuDUOyEkNKxGQiKJO1/+TUrjpsvNoak6WQsE1Ds69womMAlnDMbee/hejw+eADknJWyO1L60XSoOcJROCAkNq5GQSKMiZ7He+oWscfYRsfM+nAVdj+aREnZIko4JKE2fL/XvfS4Xj32himgvNyGEGKxGQiKNqy9ul8vjMuT24PA4fa2r4LofqpE6UsIiC17Fqs1S9dlh+YUZ5AghHWA1EhJpPPjosJRMDdy+Fu74JsFx0ClhByTolLBFKXOk8c0PpejQSVVMe9kJIQRYjYREIj9lzdNT1YHr6OGM/xR8nL72R/3idErYmvGZUr1orVTu5TY2Qkj7WI2ERCLnV22RS+My5f7AJHnaP5RI93AgUNCNqCMeAHEBpfEFcmnn+3KRAXKEkHawGgmJRGrf+VQqJ+boNLCYdvcVznDBX8CDgzKgLHVjM6V0wRqp+eBz+eUIp94JIXasRkIiFYxmW4ek6Gl3m0j2PaELup56H+CM0gvj8qVuy24p2ndEFdNedkJIbGM1EhKp1MxcKVdHputp91+fC8c19NAEvW1L3YAkHbmPlLCluUvkwq53VTHtZSeExDZWIyGRys1X3pZLE7L0ti+so4dftHvnBB256R8oUW8dmiZlk/Kk8MWtqpj2shNCYhurkZBI5c/jf5PC+OlydWiyPBkQH4aC7kvwBDdG+BPkcf8kuTcwRS6PyZTz2fOlaMdbqqj28hNCYherkZBI5pecBdIwOlUeDHT2dAeKZfgQiqD/1i9RHg9I1nvsSybnSPGytaqY9rITQmIXq5GQSKZi3Q69fQ0HnZjT1zBSD8/RuhFu5725Tvf16p/7J+qI98YxaVKYOksubNulimovPyEkNrEaCYlkbuw7IRWTc3UwmbN9zSuY4UfHgm5AxPvNoclSOSFTzi16URXVXn5CSGxiNRIS6ZQkzJDWYanyqH+SEsNwEvRgHQy7vS047rk4vXyAZDONo1LlfNJMubjxNVVUe/kJIbGH1UhIpFM/70VpGpkm95A1ziOU9rXq3qbzgg50Gtv+8XrGASlhMUovmrVCFdVefkJI7GE1EhLpPNj5gVyakKG3r5nT19y53W2HooQXRuC9Qm+m4REb0IyDW+Lz5Oy67aq4dh8QQmILq5GQSOd/nf5OihLy5dqwFL327F6PjqxDW7yCDlCOx/2nye3BCVIzNk3Ozlyqimv3ASEktrAaCYkGIHaXx6Tro0j9t6+Fr6j7Cvkfzzm4v2OOV0VK2ItT8+Tcio2quHYfEEJiB6uRkGig8pW3pHZitg4kc7aveUUxUgUd141ROsqjU8KOdZLN+JedEBJ7WI2ERAM3j56W8inYvoZsa76CHimYoDh/u0kJe31Yqk4288vy9arIdj8QQmIDq5GQaKE0eYZcH56sp6jd6+iRAsT8z+dtswmqPP0TdRQ/lhV+Tp8j/167RRXZ7gdCSPRjNRISLTQsXi9XRqfpLGsm2j1QHCMHs1SAKH2UBQF/GKXj4Jaz81epItv9QAiJfqxGQqKFe3s+lfJJWTrJzJMBiXovt79IRhL+a//opOiUsKMz5VziDPnHi5tVse2+IIREN1YjIdHEj6kzpWFkqjwe6DpOVQm7STgTibjX1TFKvzUsTSomZMsPs1fK6fU8YpWQWMRqJCSa+GH+aqkdk+ZEu3u2r0HYI0HQ3SNy/Gzeu9fWvSlh0+RM/HT5cfk6+XJD50X9/Mkv1Yv9M0JI+GM1EhJN1L72nlRPyJI7gxDt7og5hDH8s8U5uIXcvIeYm1E6yoPlhFtDk6VmbIaUZi6Qs0vXy3drAqffz7/xtlzY9Y4Uv/m+lO35SCre/Viq3v9ELn3wudR/fEAaPj0qjftPyLWDJ+XasS+l6Yu/BvwNQkh4YjUSEk3cO/FXqZiap9PA+meNi1Qg5kbQdedEb2NL0BH9mI0oS5kt57LmCc6G/zlvoZzNWyTn8hfLmYJFcnbGYrlQsFQuzlgmF2YskfMFi+Wiel+o3hfPWtFG4ZyVUrjoJSlcvUWqdrwjTQdPKXfafUwI6XusRkKijZLU2dIyPFVPTUfy2rkXlMFbDnRSMPvwcFC8Gqkn6ixyDaNTpX50Wgh4v9cwKk0aR6frn+tUxwCdg5rxmVI9KVeKpk2Xsrmr5ObeI8qldj8TQvoOq5GQaKNh2SYtVNGyfc0IupmKR3kcnGNWMROBETs6MA5Jrp+DkSQPBybrV4BDYGDHK/zWMjRFCXyGXEicKeXb3lJutfuaENI3WI2ERBv339yrRpnZcnNoqs4aF6mCjtkFZ4bBd4TuxkzBo+PiBolo9M9K8MHTAep7CvPe+R46PEne73qAz9BBwLIFRvElarTesHm3cq3d34SQ3sdqJCTa+M8vv9Mjy+bhgaevRRIdCbp3bd39HTe+3w/E/3ve9/AZhB3BhfAjRL1210fKvXafE0J6F6uRkGjkwoI1el0Y08gYkbojx7XAR3jSme7Emb63fKZ8hLX6u4MT9Rr9hbQ58vjYN8q9dp8TQnoPq5GQaKT6tXelamKWFiOIkluoggpYjNKeP2B/MiBebg5JkEvjMqV+FXPIExIOWI2ERCM3j30lpdNypHVogjwa4CtY7QkYCQS+wkyHPpM9aYZyr93nhJDew2okJFopy5qvRAiR3H7r6EgFS0EPCbNUgfV0BMnh+Na6jw8o99p9TgjpHaxGQqKVay+9KpfHZcjtwb7b19zr6SQ4vz4f1xZrgGULBMhhGaP4lTeUe+0+J4T0DlYjIdHKk0+PS8nUfH3kaCRvX+srtL88go7AQsx01IxPl7OrX1butfucENI7WI2ERDPfp8+WK6PT292+5k6tGgt0VN62z1xLE9jDDkG/NC5dflz0onKt3d+EkN7BaiQkmjn3wiZ9iAmyoWHa3YiWe9qdgu6L+UwnrVGCjleM0JFsBulhv5u9QrnW7m9CSO9gNRISzdR/uF8qJ+bodKaYdrclXIk1Qe8Id2cHP8M3EHYj6P+atVy51u5vQkjvYDUSEu2UxhdI65AUedQ/SYkUBb0rGEGvG5su381cptxq9zUhpHewGgmJdiryl0rzCGSNU4LeL9EqWLEExNmsjbeH+R7wmXKfuUS51e5rQkjvYDUSEu1c37xL6iZkB2xfi1WMSNs+c2O+ByjohIQXViMh0c7Tw6elMH66XBuWwu1rXURvWxsQJ7VjU+UfBYuUW+2+JoT0DlYjIbHAL9nzpXFUmh5lUtA7jx6hD5wm9WPT5PvpC5VL7X4mhPQOViMhsUD5i9ukbmym3ksNcXJHcpOOMVPuOHXtfM4Cuf/l35Vb7b4mhPQ8ViMhscDVjw9L1aTctu1rFPTOYQS9cVSqXMyYJ49Ofavcavc1IaTnsRoJiRWK4wvkxuDktqxxT59Xr9jG1pYRLc5DoKBFM9oXPssQgfv1jaA3j0qT86mz5fpnR5VL7X4mhPQ8ViMhsULVjBXO9rXBiVqgjKB7BY2C7mAX9McDE6VpZKqcS5klLZ8eUS61+5kQ0vNYjYTECti+Vjs+Sx8Dao92N4Iem8LeHhB0zGxoQVcj9GufHFYutfuZENLzWI2ExAqP95+UomnO9jX/w1qcNXUKejC8a+hpcjZzrjR8fFDOnvhSudXua0JIz2I1EhJL/JA7Xxo829cgUjbx8k5BB049RxPBy+n+2enYwFf3BsRL3ahUOZu3SGo/2k9BJ6QPsRoJiSUK12/XZ3qb7WsQK4zO3VHvsSLoIFRBxxLF3cHJcmlcphQuWSule/fLD8dPKpfa/UwI6VmsRkJiict7D0jF5Gy5MyhBiZQRLUP0CzjwHkRjytt+uRE4iCWK1iFJUj4pR4o37pAznx1Q7rT7mBDS81iNhMQaJYnTpXWYs33NiJYzQm9f2KIF7+lyprzBy40RPPLf3xuYpAPiCpNnSvGu95Qb7b4lhPQOViMhsUbNrBe0OGHa3ZlyNjjCFq3HqXqXEuxBf7ZkO/g+Oj43hiZJxcRMKVm4Rn55+2PlRrtvCSG9g9VISKzRuu0duTTB2b6GdXSvqMeKoIP2BR3fg28g5neGJEvdmDQ5mzJLirfsUi60+5UQ0ntYjYTEGk+P/VUuJEyX5uGe7WseITdi9sdzEHX7FHRk45TJdFiCdVzgDwTBYScAOj3YFXAhLk9+XrlBuc/uU0JI72I1EhKLnJm+WG/B0tHu/WJJ0ANF3XyOUTmE/P7AJC3kV0ekSvW4DLmYWCDnF7+k3Gb3JSGk97EaCYlFKja8JrUTs+X+oGT5bUBSm9DFKm1irvzRMjxVasdkyPnJOfJT7gL5YdXLymV2PxJC+garkZBYpPmzo1I+JVduD3bSwMaSoPuupTtglgKzFddHpEltXIEU5S6Wnxa+qFxl9x8hpG+xGgmJVYqSZ8r1Yal6rdhf4GIJs8/81rA0aU6aK5XLNir32H1GCAkPrEZCYpW6RWvlyuh0uTeIgg5Bvzk0VZ8Zf2EZg98ICXesRkJilds73pfqCVlya2iyJzAuMEgsVoQeyw53BiXptfOzeUuUe+w+I4SEB1YjIbHKf5z4uxTGO9vXcNY3hC1WBR17zrH0cHVUmvLJDPl5yVrlIrvfCCF9j9VISCxzdvZKqR/tnL4G8XYEPU797E68Em1Bc4HlQdmR2x7b1TBKv5gxX75auU65yO43QkjfYjUSEstUbN+jp92Rq9xMuxuB8wpe9As6QJnRsbkxNEUqJ+bIDwVL5JsuiPqP7+2Vnz/4VM7t3S9nP9kvRfuOSMlBnsxGSHdiNRISy9w99a2UTc3TI1Nn+5qvyEUT/olkvDgCj9SvmHpHYhmdVCZuupTlLpbiWSvkwpwVUjjvBbkw/wW5OH+NFC56SYqXrJPSZRukfMUmqXxhs1Sv3iqXXtwmdWtflbr1O+Tyxtel8eU3pGX729Ky431pfGWPNLz2rjS/+7lcP/yFcr/9nhBCOsZqJCTWKUufq/dfew9rsY9gI52OBB0/o/z6dLVBCXJtWIpejkC2uIrxDuUT1OuEbCmbmC2lE7LUa6b+2f2KI1bLJ6nPJuf4UKIoUp2n8/H5ciZznhSv3SZXDhxXt8B+XwghwbEaCYl1rq56RS6PSddnpOvDWqJU0EOmf7xeT0cHB4l3MHuBs9ABTl0DrcNS9dS88977imNpfe0OLR7QSbgyPFl3FHB624W0OXLpld3qNtjvDSHEjtVISKzz6KMjOmscRAhCFvOCrtAjdeULjRqxA/jmyYB4vWcdYIkiGE8GJLp+TlavSc7vDEzUr+gsoKMAYb84LV8urmR6WUI6g9VICJG//JA+WxpGek5fU2L29DlvlLt+r6fiYwtTbnRwNOa9HwHf98f8vgfMAKCjAF/jaNYrI1KkOC5XyjbsULfCfn8IIb5YjYQQ+cvZ5RukZqyzfQ1igwAxgxEmt9jFFu3PWARfmzeY33eAT/9QI3f4FKN+rNc3jkqVC4kF0vLBPnU77PeIEOLFaiSEyF8uvbNXqiZna3GBoEOIIDx4jT5BDybQwex2gvvF9+94Bd+x699Ro3R8hp8h6lirrxuTJiUFS9XtsN8jQogXq5EQ4lAan6/XdTEV7BUnCnowgvvF9+/4C/qvOnGP+/vO9DuC7kqm5kr1e5+q22G/R4QQB6uREOJQnr1A779GwNZv/ZxUsNEF4gLiXAIbGub7/r+HbHq+GfXM9xM0/nZ/3H8LsyKYHcEWue+XMEMdIR1hNRJCHK5teF3qlaBg+hdR3dE1KgfhJeh/Ph/f9vfga4zSL49MlX9mzFG3w36PCCEOViMhxOHRvhNSGJev90pj21X0CXqoOFPj9s+6j9/1LIjn//R3tsPhoJxz8QVyb/8pdUvs94kQQkEnpEN+Tp8jjaO8h7X4i1Bs0DuCjv/x9Dl3cFyCXB+WKqVTcuXhh4fV7bDfI0IIBZ2QDil+YZPUjc3U6+gm2h2YiHfSdSDavp0kp+NgtgZC0JFVrmKyEvT396vbYb9HhBAKOiEd0vjBPn3S2J1B0X9YS2/TkaA/7Z+oI92rJuXK/bc/U7fDfo8IIRR0QkKiaNp0JSzerHFuUSLdiSPoOoOcEnN0oG4OTdaCfm/3XnUr7PeHEEJBJyQkKqYvk+aRzvY1I+iccu9+TFCcEXQEIuoR+sQcubfrY3Ur7PeHEEJBJyQkbm7aJZfHZ7azfc0ZWfra2rMTN2b7m08nyXPCGwS9ZmKu3HrtQ3Ur7PeHEEJBJyQkfj/4pZTG5enjPjENDEH3HaFT0J8F9172NlyCXj0hR27veF/dCvv9IYRQ0AkJmR+yF0hD0O1rFPRnw9dPprOEXQVIvXtpQpbceOVtdRvs94YQQkEnJGSK1u3QwuK/fc0hmHAHsxNfHD/5xyc4gp4gNeMz5caWN9VtsN8bQggFnZCQufTeZ1I+KUvuDkawln9AHIX72Qj0H8QdU+4Q9NrxWXJnG0fohLSH1UgIsVOckK+3UT0e6H9QCwX92WhP0JOkflyW3NyyW90C+30hhFDQCekU1TNWyNVRaXJ/YJLeWuUWINJ5INrONLsj6Jhqbws27B8vTwfE650FDeOy5fbmPeoW2O8LIaQLgn792Gm5tu+YNH92VK5+Dpyf9fv9xzVNyg70z+q7TQdPyRVF3eGT6k/Y/y4hkUDzpl16Hf3m4JQoPX2td/EXdGOHqOvPlKDfGZIsl8dmScu6neoW2O8LISREQb+y830pn7daCpNnSsnUXCmfkq1wv/qCgxRA2dQ8/f2ShBlSljFPqma/IFXLN0nd9j1S8z7TOJLI4/Znx+ViwkxpHpYa46evdS8moYz/CB1BcRihY8r9+vrX1S2w3xdCSAeCXrnrffk+a64UKWGuG5Mm10ek6T2htwcn6EoGsL4F/N8b8P3rw5OlaUSKXB6TLpUTMuVCXJ6cy1skZeteVf/G/r8JCVd+yl0kDaMy9PY1jNL9xYl0BfsI/deBCboNQbtxbetbyv32e0IIaUfQa17aJiXTpmshRzINHEzxcGCizmWNCF8k1+gIfBeg4XuoxB7RwaicON+4fnSGlE3OkeL8pVL/6rvqX9qvg5Bwo0TVjUvjMuW+ep4DBd1XmILbg30v1vD1g5mC12KuRudoP3AW/cVp+XLro4PK/fZ7QggJIuilm16T0in50jIcuau9qS6Bb2UEwRomx972e57pMyP09wcl63OOa8ZmSGHybPVvA6+DkHCk/r3PpXxSjl7bxfNse+7tNrfd9r1YxNcPpr0AaC8wGLg8MlV+TJ2lXG+/H4QQhwDD1R3v6BSXWCN0i7lvJewaPpVV/V1U1htqlFM/Ok1K4/Ol8oXN6hJ8r4eQcKQooUBaVR2xZ41zYwTLV7xN7nK3LRrxL6ep/+7vBANb1u4NSpDqcRlybsk65Xb7vSCEOPi8aTn6pVxMmuE5Varnt+WgYmO0jrX3JvU/dQDdqi3qUnwvkpBwo3rOavXMpulpdy1Sz8VZn3GbmAMKuhefQDjXd9BZwixeybQ8afzwgHK7/V4QQhx83ny/bL1UTHROlHJPJToV0rdh6o4GCZXWrJNhjb5xVJrg3OnqtdvV5fheKCHhxPXNu53ta0OS9DPsK1JuAfetN7GOEWvz3i3k5nPTJsC3tWMypGzuKuVy+30ghHjxefPPjFl6+hs9Y1QqVDCvcHe/oINfn4/T/wsdCHQkcPhFceIMdTm+F0pIOHH/sxNSGD9dB3hCfBAj4n2u3QLuW2+IQvnKOiof4CSSQfsDMa8fmy6FqXPk3v5TyuX2+0AI8dL2w4PPj+tIUkSUtre/1r+H3S0gI5Rq9NAw3h2aoiPri7MWqMsKvGBCwoUfpy/xdoC5fa1d/Dv/7nYEr/Af6j8OvkFqXeyCQbBs3TufKFfb/U8I8aXth/tvfyYVk7OldUiKPO3vCLr/dJh/RewunP+T0Cbq2NqG05WK85aoSwu8aELCgcL1O6RKPacI3HKWqCjqwfCf0dMzc57ZOXSIMDuH7bFYdqucmCPF2Qvlxrv7lZvtvieEBNL2w6P39mtBv6EqFRqnQEHv+QbL9NQRkIfKXTkhWwrnrFSXF3jhhPQ1tR/u05kRMT3snXZvv570RIc4EoEPEMX+YFCitA5L1kmnkJfiQtocqVy7Ta4e/lK52O53Qoidth9+PfSlYCsOptzROAU2Oj0v6ACjdGdLW5LeOleiKnnp0rXqEgMvnpC+pjR5lo7ExijzN0/6Ugp6B6Djo4CY3xqdLtcSZkn9jBXSsOF1afn4kDSc+Eq51u5vQkhwfN78K2OuNKoKZoLibFPu3S/s2O4T59PQ4RWifk+N1JtHpOntbGVrXlGX6HvxhPQ19QvXyhVVZ/Cs/t4/ST2/pn741xP/99GBmUr3n1K3gfbE1HOMzm8NTZQbybPl6Za35ep7+6Ry/1HlUrufCSEd4/Pml5Uv6yQOJqGMrVJ2f8MUKOjAqfSOqGNd7WLSLCnf+Jq6TN8CENKX3Nr6ltSOz5Lb+vQ1k7vBjXmm/d9HB6GKObAJOrb+NbOzTki34POm/kOso+fqABUd6W5tgHqqYQr8u6j4uA69hWVMpt7C4r5eQvoaE0zqxJ6oEbqedneeXxPs2TP1JXxxd8xtGFFHUh4klCrPmKdcafcvISR0AgzeNUHfxslLTzVQ9r+Lio81fYg68r7jlDb/ayakr/jtwEmdKhlBnPbtnj1VX8ITI9a2z9yYeo0dLVUTs5Qr7f4lhIROgOHKis064hSZ2zDtbipnqBW16/g3fN73JnMURkGIfC+d84JUv/u5ulzfayekt3ly8Iu2/A3uYNLAVLD+z3dsAz9h2h37zhtHpcrFFB7QRMizEmB48ulxKZ2Sq0fpZvuaqYB9Jeiafom68qPhxElXpcs2qcv1vXZCepuHB7+U8/H5bRnj3HWkt7d9RgJunzii7j3v3N+3hJDOYTX+mDO/Ldq9Z0U8dJzK75y+1DQiRUqm5ksNg2lIH/P4QEeCHhtC7g6Oay9AzreT49Rr1Omro9KkOCFfudTuZ0JIx1iNpS+/rjO1oaIFj3bvfVD5Mf1+R11Xw8hUKU2cKaXrX1WXHFgGQnqDBwe+0IKOTqa9A0xBd2ME3XwH79FRvz04QS6NS1cutfuZENIxVuPNo6elMi5fb8XRo44+bJD+eM63QXzaL05dExqAJKkblSqFyTPVJQeWgZDeAIJ+Lr5AC/rDgcHPQCDBMelfr45Q9Vm1O/4+JoSEhtUISlPnScvwNL0nHYLeVw0VBN0RdWNz9qyjV6+3s43Lkovc9kL6iCdHv5Gz06bLleHJFPQuAp9hJlB30kdnKLfafU0IaR+rETSv2aaPL0Qlg3ii0vVGY+X9P/5C7gu+g149DpPB8kDR9KXqsu1lIaSngKBjhN480kn/2ht1JBox9RnBuMjp7u9nQkjHWI3g6ecndcrVFjXywBQ3psWcwycCK2N3EqqgA3wPSwJoBBD5XjJ/tbp0e3kI6QkeHf5KzifMaGcNnYQK2hjE7WAp7Xz2fOVeu88JIXasRgOi3RtGOec9Px0QrwNYvILb0/iundvs+joGJDk534enSMXUPCldsVFdur08hHQ3Dw+d1oKOKXcKeudxR73Ddxg8tAxL0h10f18TQtrHajQUb3Si3bH/G4JuKl24CLqmX6Ley6pFXXU+cGJcxfrt6vLtZSKkO3mAfegcoXcL8J3ZxYLzG4oY8EpIp7AaDS0HT+pRL7aUYB3dXfk62p7yrLgbxnb/T/943Qg8Uj39O0OSpX50mhQmzVCXby8TId3JfVeUu1vQ/fdbk9CA/xBciGQz1ROYEpaQzmA1utG53T3Tie419HARdHxPo0btWE9H5HvtmDQ5n8nId9Lz3Nt/yjpCp6B3DfjPbGPDwS0XEguUm+2+J4T4YjW6qV+8Tq6MDczt3nv4T727c2S77aoxGBCvG4LWYcn6GNjivMWqCPZyEdIdQND9R+gU89DxDgy89dyIOjrnTDZDSOhYjW5uv/GhVE7KkhtDsX1NVbheiHT3xVvRHXwF3T+oBg0B1vxx+hUOcrk4f40qhr1shDwrd/edtE65k9CwCTqAH+HP68qv2G3j73dCSCBWo5vfTv9TziY7DZZ/rupwwH80hKl3dDyQEKd5WKo+aKZ06VpVFHv5CHkWbn923GfKvfc7vJGNEfTABFJO8igEyNWOTZULM5Yod9vvASHEwWr05/y8lVI3xtm+hhGwu9KFC15hV41Cv0S9PIBlgqaRaVIyLU9KX9ymimIvHyFd5eYnRxnl/gy0J+jw5eOB8XJtWJIUT+E2NkI6wmr059Kre3TEqT6sxSPovyvR9J0K7y3wP73/12fKXZ9B7flcXR9mFJDpDnvpLyYWSOXG11Vx7GUkpCtA0Dnl3jPAl2hv9GFMo1OlJGOucrn9PhBCQhT01kNfSNnUPB2kApFEZQsXQQ/E+RxC3xb5PjhFasdkSCFzvpNupnXvEQp6D2JG6Wh7qidlK5fb7wMhJERBB8Wps+XaMNVoDYqUAyhU46rA1Dsa2ptDU3WSnMJ8Rr6T7uP6R4co6M8A/NW+z+KcQNf+8c42trQ5yu32e0FIrGM12ri8crPUeQ5rQQVDJfQPSAsHzDW5ZxBwvWhsEfleMVGJ+szlqkj2chLSGVo+OMA19GegY38pQQeqY35zaLJUTshUbrffC0JiHavRxj01EimOy9ei+GRAOI/S7VPyEHXEAGCWAXmiy1dsUsWyl5WQUCg8/qXc+ew4R+jdwB9KtEHbe0+wnHmP2Ta9c0WN0ktUB8r/XhBCOiHo4KeUWdKgKlQ4bl/z4ivmfz7vnUXANhjsUb82Ol2Kpk2XS+t3qGLZy0pIR1w4clLufnKMgt4N+Au4TdAxkMAM4aVxHKUTYsNqDMYv81dJ/ZhM3XBhxGsqW1+Cig7Me++UO17jfJYF0NjiurGd7YoSdfT0a7a+qYpmLy8h7XH+8Am5/TGD4p4NM6MWOKvmj4mHuToiVQrj8tUtsN8XQmIVqzEY1a+9q7evPRicIk/UyDcc1tD9Bd0Xd1Y5j8j3j9eJZ9DTx976ixnzpOb1d1Tx7GUmJBhnDx6Tmx8yKO7ZcAt6+6IO36LdQd2tHZUupdOXqttgvzeExCJWYzBuHj0t5VNydYWCKIZn49V+owBRxygdywZIZ1szNkNKchap4tnLTEgwft53WFo/OEhBfwb8p9Y7Ap33BwOS5PqwVCmbzGQzhLixGtujJGmmtKrKhMYrPNNctt/TN6N0E/kOUa8anylFc19QxbOXmRAbP31+SFre3UdBfwa6Iug4KhkBrjgq+Xz2fHUr7PeHkFjDamyP+nkv6XSq9wYmtTPV3fe4Gwrb0oCevusXpxvhluGpOvK9aul6Of/Ge6qY9rIT4s+Vtz+VM/HTKejdjrdjjvpr6jC2o2pRR70dlqTrrf89ISRWsRrb48Yrb8ulCVk6+1rfHKfaPqbiI7rd3fMPJupoHLAdBoE2OMilaOXLcvatD1RR7eUnxE3DW3sp6D1CsJk2ZYOoD3BG6RhcFKfMUrfCfn8IiSWsxvb49dBXUqgaMOznDt919NB5+ly87phgxgGNQ1FCgVS8tF1+evsjVVy7Dwgx1O360EfQ3ctQtk4k8SeYcLcP2h2M0m8NTdZLZv73hZBYxGrsiB8zZuttX+G9Hz00nBOenBSxCPbDulxh8mwpenmnKqq9/IQYat/4QM6qTqBthE5BD4WuCTowcTDNo9LkfMJ0dTvs94iQWMFq7IjzS9dKbdgdp2oaBgc0rKF2NtDwOj3+afoQCJTtfOY8KX1ltyqu3QeEgOrX35NziTN0BjMj6BTy3gG+RrIofXDLuDR1O+z3iJBYwWrsiEs73w84TrXv6bqgg98934eoI/IdOaMvFiyVC6/tUUW2+4GQilffljNJvoJue75IzwB/I/sjAlt5ZjqJdazGjmg5eFIqJufqc4rRQ7ZVtN7HiLnts9BA44AOik4POyxFKifmyIV5q+U8RZ0EoXz7HjmbPFOujkqThwMj5STCcKaz9RhtUILO/lg3OkN+4TY2EsNYjaFQGp8vra7z0fueZxd0jSeTHI6JRSNdiMj3pevkpzeYTY4EUrL1TY7Qu5XOC7rextY/SR8cVaQGGv73iJBYwWoMhaq8xXqaC42YvaL1DmhAu9KIIhjOCYjz/8xpIJ72T9S9fkS+l0ybLkVrtqpi231BYpeizW9Q0HuA4AlnHMHXddT1M4JaUV8bVCe8KG2uujX2+0VINGM1hsLVVa9I4+h0vY7el41YTwi6SV6Bkfrdwcm6kcC06sV1r6qi2/1BYpPCl3dqQW9Sgn6/vxNcGfhMkc7SGUE37zFKvzk0VSonZKtbY79fhEQzVmMoPHzzE6kZn6kjTE2CmUiM7g3ecDgdBYg6yoj1uYvpc+XiZm5nI14ubHzNV9DbRMa7e8Im8u09d6QrOKN0JIlqVB1w3BP/e0VItGM1hsKfR7/VZ4pj2t0kmIk2QTcgTgCZ8XAO89m8RXL2lTeUC+x+IbHFufWvyi+JBVrQ9ZS7S9ABBb33gO/RFrUOSdGj9DM8jY3EGFZjqPw7a7buDUdyghn/htV/Kh7T70g1aYJuKlRDUThzuSq+3ScktjizdnuboDPKve8wgwmIOkbpiGkonMYAORJbWI2h8vPiNWGYYKZzdCTozs/OyEs3FMNT9LGNZxeuUS6w+4XEDr+8uFVnioOAoGMbqfUgWkAH3MS+oG36KWueuk32e0dItGE1hkrRuh16HR37ttGQtT/l7jsVGS74C7rtOk250FAg5ztSTRbH5Uv5Cy/LT2++q1xh9w+Jfr5f+pKcnZanD/cxgu6M0p3nKPD5Ij2H43N0vnEvcGY6ZtT871lPcHHGCp2IChTmL5HC3MVSmLNILmYvkMKsuVKYMU+K0xWpsx1SZgmOoi5JmCHYAlwal6cPhypRg4XSSdl60FA2Ub1qMvVrhXoFSHrVEVUTs5xX1T4jCRhAW+3GfIZXjed3fFH/F3j+N65DX5/nVYPrVnWgOL5AylJmS0naHCnNXCCl8IHyxQXlE39/kZ7BagyVurf2qocgR28XwTavaBV0Axpqsz0GSw04pKZw3TblCrt/SPRzbt4qnaEM4kFB70tMvXUE3QmQS9AdrdrxWfoeoeOFYDkskdjATMuZuFw5qzg/NV8uKKFCHgr8bvGkXCmdmOsIqxK4cvU3IXaV49TruAypHpulY2xqxmZI7ZgMHUSLcyEaRqdq0F5gCyxmcgCuC/FH14cn68yUN4cm64NmEIALcK4EuDMkWb0650zgFTMPSOhlXtEWdeYVAxLvayC3B2K7rvN953+4PlfXgmtrHay+o6/Lc63DUqR1WLIuC8qE8qGs2AUFP8An6DBUKJ/huNti1Qk4j1lO5Wfte9XB+TlrnvyUv1hVKXs9I6FhNYZKy6FTUjE1T9/cJwMSPRUqsIL52iMPdFTaOiv943XDjTLXjUmTC6o3WrKJke+xxI+rN8svL2yUksXrpEaNQtCQozFGHfj1+biA54f0HP4dJh3zotobdKqeDIjXCaJwb9DhQqIoxDqA5lHpWnTMe23D64gUDZbWIE6aoernoalKeCFc3lcE3zkoYRuc4iPGXiGEODoCqlE/o6MBsFQJ0J4AzAC6eaTaHOdnZ3awO17R0fG+BsN8PxDbter3qiPglCdJL02aDgN8YToq8BV8B38iEyd83DwiTR/0ha3BEH/UJcwaoNOE0b/OAZIyR4oo9iFhNXaG4oR83bvETXULt6lY0SDowAi6HqWrBx7lRbkxdXUxZ5Gc28LI93Dnu9Wb5Jd12+SnNVvkp5Wb5OcVimXr5IeFa+TnBWvkp7mr5Oc5K+THGYvl5+mL5Mec+fJz9nz5JWOu/KI6bj+nzJQzyTP1qOIcphhVg4PRB0ZbaMQwS+WMzklv4RZ0p4467Q1+1qLeL06JjiNQqLMQHQQvusXU/9UGOmvALWRuIJAaiKVHMAEGAHrWRl2TeY/r8se/XMFoG1h0G6Z9Nti+4wXXauu0tpVF/Q2D8cGT550jqlE/3D6DP+Fb+B31R3d0BjmzAmb0j44YOloYPGEJwJlpmS5nMxgbYcNq7Azl2Yu8DVo7D0TggxvaAxQuuK/f/IwHEb1NTL2dn7lCzm17U7nE7icSnF927JZzr+6WC6+8KRdf2SVFW3fpWY+SDa/L+VUvy/kV6+X80vVycfFLcn7+armgRPfijGWe9crFep2yKHO+zhCG3nxxsurRq0qPOIeSyXlta31murRyknd9EbStKypxrhmbpoOp0IAAPW2qRg+YMnVPm+KZR2ODRgfPPhoo5/mPrOc6GnGLnqmrNszyiP+rD+petuH/WQiYa3C/xgpuP7RHWwfI82oE3yv2zpIDBlBG4DGqrx/j1F9M42Mkj3V7/7Yl1rAaO0PDko16rQS9Kt0LUzeovZvrtUWuoBvwAOJhw9QR1tiwnurvn1jj5x17BAJ9Vgn0L6+8IWc375SzG3YItnedWb1FzqzYID8vWStnFqyWX+aulLMzl8s5Jcpns9RIOH22MwpOmiHn4gvkbNs6ZrYeDUOUtSArMa4e50zPXRqdKpfHpLeJbdNwJbbD0+T6iDQ9vYdGwEyDAqwL3h2cGLAGaaZD3fhPjRrMqM00PPq5b3ueI+u5jkbaG8X6T9F3DO9nX2LaXX+h17Msg5z03G1LKp71esQ6YAbtbGbspQC2GjvD9c27ddAJGk1fQfetCE/7xWnM+8jFWy79oClRhzhATDAiPKtGkv4+imR+2rhdzq7bLudf2ioXVm+W88s3ygUlyBcWrNEjZUSwXsxbJBeUICOStyR1to7cLVFibCJ20YM2Qtw2IlYVr25sutQqQcYo2D0C1muaCK5Bb1x1lrDehpkQCLRev1TPGp43t1CbNUpn6i7JR3xNQ2DA2iqeVe+IwHnV793AZsFn1OYh8Dlx6LyAkM7h1EfT8MNmptu9bVHk4X/9ffUc+f/f3vZrQF3z/H9TR93T9uiEI2BPr9GrdgTtiTOKdyLxy2Jgmt5q7Ay39nwm5cpZaGgRxOG92V7h0zcmCgVd098JXEFPEVOz5xJnyNmVG5Vr7P7qazCCPvPa23J221tyZquz7v/DC5sE269+mL9afpi9XH4oWCI/5S6SH9SI+UzabCcCOC7Xd7SMwJXxTo8YU9SYpUGgEaaib6gRshkZ+wqv4yc9AobwqsrnPwpGcA1633jVYmxetRB71+C0sPZPDC60eA7VvfG9d15CbyD97nfbe3/cv+Ml9P9Duobjf9PQuz/zfx9J+Jenr54j//9r83NPYupzR/XMXJdZp0ebgVTM6NyjzUGOfwwWMLOn1+FTZum2L9qwGjvDvYNfaBHDSAqONDf7z+fjI6Qha/9BCaUioczozCDSFT3CiymzdeCVv696kjPb35KL23ZL8RbP+vNL26T0hS1SvGitlM5dJaUzlklJ9kIpTZ8rZUmzpDRuuh5Bm/2tGDnjYXdGzpk64tSsHWPNCj1eiDVGy8A9UoZYa6HGyHiQE3DkFmMjyN7oWfera0SsgC/NKwRZV1LYPAJu3vt/rt9b7o0/odxPN/5/2/v7znPT0f823/f+HukZnPvh9bGp1/73ydjM93qXjp6XSKGrz3PPlR+DRQwa1c+edkG3Kard0G2NaoswkEB7hZ0LjaNS9QwhZg2xh74wZ6FqRu1tayRhNXYWjOTQ8KPhNjcrchqw9it4qOVALxLlNznfz2T2zPTOma07nUjtlRvkl6XrnLXomcvll5xFckaJtV5/VmJ9cWqeDgjDVDeEul49vEac8UD7ri37jpyd9WMn6tSIsz9mtNwmxqriIEWuf4X1f+/GfBbsc4OeQlX+dXrq9u+ESmefS//r8/5u+8+Nwfy/zv5f0lmc++H1s7k/Dt77aGzu3+09/J+nSKWrz3PPld8R9GDxE+b/op16qAQfs4CYIbwzJFG1h8l62Q8JfM4nTJef8yJX3K3GzoJpWozo0Pijcfd1Zt9WoI7wT/Ua/Ho7LgceFvgAARqYjj6XPV++WRn6mvq/Vm+Wn194WQeNnZ2/Ss4rv55TD9dFZJlKna1zU2NUXe6J0sZ+TSSxwKxAw6gMHflpAsMwisZ16MAwj3AHjKD1KNmMlD3ijJHwACWgmM5W7/XPphL6jYg18IlHyI0fbJXKfN/f/qyYhsX9P58+5yztBKvcwNsgOffV+77zmN/t6u+TZ8f7fHVcT8MB9zMTynPTXfUn1P/X23T2ukxKbvyMbXTt1XWD/o67DVNtG+JpMHDBgAYJfswWOQyEkDisuGCZaprt7XU4YjV2FgRLIdDpwaBkZ6Tm48jwrmDdKeh4SLDnEg8IxBSieyZ3oV6f/ueK9fLN8pfk2yWr5dt5K+Sfs5bLv6Yvkn+rz3/Inic/Ya1aja7PxDmR3TqiW69RO9umkOwCmZgwsr411MnUhOhs7Nt0RtImECzJZ/0ZI2mghVpdf7CGIZQKYadjvwD//xtqBe7ouvyXdvB9I+jt4f3/zvWHej0GW1k68/uke/E+X6E9j32N+5kJ5bnxrz9dJdT/19t09rrcgh7ML+21Hfhf5nP8PtpHDGrQbmLkjkEQdstgtrVocm7E7Hu3GjtLxdZdOpIQI0Aj6HCW26Hum2Uezu54QPsa/w4ByoQHAyKL0TECxqomO5HeZtuVFmoT6T3akyJSibaeEh+hQJYq1xq1mQ7H33SmvL1r0PC3GVm3jbBd/nXjvm5CCCEO7nYS7ajThqv2dzBihlJ1+4wZUZ2zfvoSJXt2LexrrMbOUvfmR1I9KVcLDxxhc5hN0N2fRyqBI3zPQ6GEFeILn+gp72EpnvVqR6C9Iu0dWTuvvtPhWqg9Ym38Fi2+I4SQ8MJZi8fPbe14f2crLNpuxB8hmK5oap6cyQm/RDZWY2e5uveQVEzO1QXG9C6c4Z1C8TooOoGYe3GLrunpQaDN1LcRai3W6vO2QDK/3w0An1uwX1NfYHxg+8xNqN8jhJC+wQxATTsLYUf7jQEXdA4xSphZRdbJwtTw2QJnNXaW1hNfS5nqsWAkCqEyDmlP0L2fRzpGoByMAJvPvcJrcP+uswZsaN8fnr/vh/27fYG9fIGE+j1CCOkbjD7hTJKnzzlLx3oJub+Tmx+DNMywYlkUW+CwnOqvi32B1dgVihNn6M37KKhb0KJHuHuG9gI3CCGEhAPegYgetA1AQrFpegscgpMRsHx5ZKoesftrY29iNXaFytwlen0BUxIUdF8g2qFEXhNCCAk/vKeHem1mNlYvrXoS15gRe9nkHLnQB2vsVmNXuDTvRb0HGiH/mJZwnMDRJyGEkGjFs/zpEXYnEDpBWoYl6UOjkEPeXyt7EquxKzSs3KwLgOhtFMw9So9l2KkhhJDowLTn3pln35gg/xE7hL12fIZcTJqhZNLRyooTX7f93N1YjV3h1rY9+sKdwDgKes/j+yD1PaFeT7hdNyGEdB/QPgAdxBI0jnfFCZJVE7OkKGuBXHplt5R+elDJpl1LnwWrsSs82P2JvmCkz6Og9wbhJoyhXk+4XTchhPQM0EGkl0XKbWgjztQoSiiQ0tVbperjfVJ0/JSST7umdgWrsSs83XtMKqbm6Qxn/pHusYyZmrEloCGEEBL+mFG31+Zuy9sPeMbvYRoeB8JgDztizZA5tGTGMml89zOpOtZ9om41doXfjn8rF+KdY1Qp6F4o6IQQEtk8i6CDtt8f4Jxi2TosWaf/PpcxV5r37JWa418oGbVra2ewGrvKP9Nm6py3CAhwkp54IgB9Ck8IIYT0PWbAZfsM+Au5//f9P/fHGxTt0UP1XYzWsbaOLW5mCr555wfSePy0klG7toaK1dhVvs2Zp4+ew8UiVR4FnRBCSLjS04LuxdFD8x6/o7PNDUnRg+CLiQXSuP0daT71jZJSu76GgtXYVf41a7k+XQxrBeiFmAt3Fzh0BxBCCCE9ia/QPiveAaz37/pvXTbvoYNIlY6jsBtGpkpZwgxpeuVtuX7qWyWndo3tCKuxq/yyeK0+iUaP0IMIOiGEEBIe9Lygt31myRb6h+egrruDk+XKiFQpmTZdGra+peTUrrEdYTV2lYurNsulcel60d8IOiGEEELs/Pp8nDNSH5SkRb00vkDqtu9RkmrX2fawGrtK8dptUjO+fUHvaM2CEEIIiQVwyqb5GaJ+b6AS9dHpciGxQK68+aGSVbvWBsNq7CrlW97Qgo6UdxyhE0IIIR2DdXWzpo696g2jU3W62NZDndvOZjV2lZrX35PqCVkUdEIIISRETKAcpt+RWQ4HvCDA/Ifszp3YZjV2lfrdH0v1pGx94hoE3T21zql2QgghxItNF52R+jS9Tx3JZ8rmrVbyatdcf6zGrtL07uc6nzt6F84+9PYvnBBCCIlV/HXRvaUN+9Qh6iWTc3SKWH+9tWE1dpWWjw9L5cQcLehYCzBb1oC5YEIIIYR4+b1fonr1HQRjlhsB5vWj0+RM7kIlsXbddWM1dpUbnx2Xqkm5cnswBZ0QQghpD+/edO++dYzS9Ui9f7zWURx4VjI5T1r3fKpk1q69Bquxq9w6+IVUTPYKuvvCCSGEEOLFTLFDzDFK975XKEEH2MrWOCpNymeuVDJr116D1dhVbh3/Wh+hagTd5+IIIYQQ0oZb0B1R92omfkbUu7OWniLF8QVKZu3aa7Aan4XSOEfQnwzAmoD3whkURwghhHgJFhSHI1l/9yxVY3CMLHI1U/Ll0cm/KZm1ay+wGp8FI+j+U+4UdEIIIcRLcF3E2rqzvu4Ex3m2sL38upJZu/YCq7GrtBz7Wso8U+7Ytma/UO/iPyGEEELs6Gl3I+hjM+Rfc9pfR7cauwoFnRBCCOk+nvSLkwcDkqR2TIb8o2CRklq7/gKr8Vkojc+XW0MTOeVOCCGEdII/nsNA2Fc7MUKHoNeNzpC/5befCtZqfBaK4vPk5hCuoRNCCCGdwSbovykxfzgwWY/Qf1i4RsmsXXuB1fgsGEFHqD0TyhBCCCGhETjwdZavsRcdB59d2f2Rklm79gKr8VmgoBNCCCGdxybomO3GkarlU3LlzrGvlczatRdYjc9CoRL01qGOoGNTvH8QHFPBEkIIIV49DKqL/ePlgdJSpH8tTJqhJNauuwar8VlwC7pzgb6CTgghhBC7oJvkMniPgDgklakfmy61yzYqibXrrsFqfBbcgu6+cEIIIYS4cQa8ttPWIOiPBybKtWFO2tenh08ribXrrsFqfBacNfSkgCh3Q+AaASGEEBKLOILuxfvZYz06T9AJZQqXrFXyatdcN1bjs1Acl68F3T+XOyGEEEI6BqNznIV+bViSFCd2vHZusBq7SsvJv0rJVEfQg43QCSGEEGIH6+ZYsm5RYl42OUeatu9R8mrXXH+sxq5y7chpKZ1CQSeEEEJCxQTFPX3eiT/DNrXKcRlybtkGJa12vbVhNXaVG4e/kPLJFHRCCCEkFJ4+F6e3p2FkDt3E2ec147KlcOZyJat2rQ2G1dhVrh04oQUdvQt/QWcwHCGEEOIGOpngjMz7xTvnno/NkO9nLVOSatfZ9rAau0rTp0ekQp+2RkEnhBBC2kfpZD/nMLNbgxKlcXS6FGbMUXJq19iOsBq7ypWPDkrlFH9Bd3oggQUhhBBCYguTOAZg3Rw7wu4NSpCGkSlSlDJL/jz+VyWndo3tCKuxq9S/97lUTM6loBNCCCHtoBPHKJ1EzFndqFQpVmL+nye+VVJq19dQsBq7Su2eT6RqUq5eB8CF6sV+z8Vzyp0QQghxgEZCK+vGpMmZzHny2+l/Khm1a2uoWI1dpfrNj3wE3X3xFHRCCCGxDEblZp95qxqZ14zPlAvZC5V82jW1s1iNXaV+z16pmphjFXRCCCEkEuh4AGpfSjY52bFObtbKfQ5b6ZegM8DdGJqkB79nF4eW0jVUrMauUrPzfS3oOIwdF+4uKCGEEBIJhCro7gC3YHadMGaAcwwqRuUNo9KkYtp0ubplt5JNu5Z2Fauxq1Rs3yNV4zN1xB6mFVCYjh0TGxg/0B+EENK3aJFV2D7rDMHac2PD/8AhK05e9hSpVAPeC7mL5NHRb5Rk2nX0WbAau0rRhlf1moARdATFUcC8GF/QH4QQEvmY9jxgRO4R8geDEuX6kESpH50mJQkzpGHD60oq7frZHViNXeXimi1a0NEbgaAHTkdEI2YtxdCRPVT8f6+rf4cQQmIN0152hO1328O7cwu/769xyPj2tH+iPBmUJDj69NrIFKmanC0XZi2XJ1/+XcmkXTu7C6uxq5xZtl4ujUtvE3R3QaOXYA+Ir73zUzzB/p77O4QQQgIx7aWdP55zsP9ue/gKOl69I/IEvU6OfeVXRqRI5YRMKUmbI/d271XyaNfM7sZq7Co/LXxR6samy8OBia4RuuPAzgsaIYQQEjpenfGKt0Pgd214NSpO/vARbzv6/w2I19vQ7g6MlxtDU9SgNlPOpM2Wqm3dH/TWEVZjV/l++mK9SR69FO8InYJOCCGk5/HqTM8Juvkfeo3cNSJHQDjWyS+/+IqSQ7tG9jRWY1fA+sDPKTOlcVSqn6ATQ9diCjr3QBJCCHEIvc3Fejj2kAd+5v4bEHJoG0bkWCPHfnKMyH9OmyXFG3coKbTrY29hNXaFXw99KRen5UuT6qlQ0Nunc8JOQSeEkK7QUVvr/dxpZ/HeALsZjRsRR3wY9pJj4Fo9KVtKk2dJy8tvKAm062JvYzV2hYefHJXiuFy91w4Fx4HtbsfFOsEeLPcD5OBkGvJ+h4JOCCE2jOD62/98Pr5tS5kN8z33eSPAtNNP+8U5f9uzPg4hx9R688hUHbV+NneBNO75WEmfXQ/7CquxK9zZ85k+C/36sFQd7WdzcqxjHpZg7x38BZyCTgghNtyC7m5PbSLuxnzPYP4ORuJYG380YJrcH5yop9QblIjXTsyWsmkFcmnWC/Kfn59UkmfXwb7GauwKrdvekeoJOXJzqCPovwYEFMS2MJmRt96nSIEmhJBuxTZgctv83//hGXhqIe+XoEfiWC7G2jim1a+MTpPSKbn6JLTq7W8rmbNrXzhhNXaFq+t3St3YTLk9OEU7B07ydXDsCbq3x+c8LA8HJsuj/kn6Z9jQE8TnbswDZsDShc979Xd9/UoIIbGLf3sYrH2E3bSj7nYZmU2x3ax5RJrepYW18fLEAqmZv0b+PHBKyZtd88IRq7ErNCzbJJfHpOuT1oww+To0ugXdLbhmSgd+0D2+IcnSOiJdro1Mk9ZhqdI6KFl1fJLknuoFYloH6QHxPYAHzCv4XtBJMh0l8z9tU0eEEBI7ONHpaAuxbg6bTdBN++weieMQsVtDk6VpZKpUTM6Vsymz5Ny8lXL94wNK0uw6F+5YjV2hZu5qaR6Vpns72nl+wQbRPjo3D4x5DzGHL9Dra0qcJf+5cbdcXbJRytLmS3F8gZRNzVMPUbbUTMyWugmZUj8uQ+rHpuucv1izaRqeqgMMW4ek6GCMu4OT9QNoRB8ij4ANLfTqf7W9+mGuqz3c5SCEkMjBO1D0H4GjfUQa1of94+W+wtlmliJXRqRK/ZhMNRLPVSPxmVI5a6Xce+czJWN2bYskrMauUJGzUFqUCEFwAp3uT8cZeMIf3wcJr444OiNpZMu7NjpdylPnyf859jflokCf3T/5rbR8sE8u73hHLr6wUb6ftUz+njNH/pU5S/cWi6ZNl5rJedIwLluaxmTINTXKR9Ah1ncwwscDihkRdBwg9hjtIxrTf8SPBxodgCcDEttedQfA0wkwlcDgnuY35fXv9eK9rSfsxvZ5sN8JFqxiwLUExmV0P+7rMNfafjm9z4ENfz+SvgbPkPs5Mvev/ftI7PXA1Jf260hw3PXN9j7w7zr3CaPyp8/F+4zKdRuh2jQzAkdbiHYRAyK0mxgwlUzNlV/SZ0vRkg1y9cODqhkObJcjGauxKxQnzpDWYcnamfYbYfCvUJFKYANgHig8RBhdl8fly4OPDiv32H3WEf/3rz/I//r8lPz51j55tHmP3FixRS7lL9V7H0sSp0vZtHy9s6BySp5e90EkJkA+fYz4sR6EEX/dqFS5jFH/iBRpUT1UM+p3OgVOh8DdATA8Vp0SZ8rfifx0j/zdHQI3RsA6Qm9r9HQc3D50457lwfeCCbr7WQv2czDwP9zfMw1KKL/rYBoY+/fbymv5jIQDph4H1ufOEvozEz34C3BnsJ3G6X5v/GnqkAkobmt7PGCAggGUGYGjnasfnaEPCqvCKDxetZUZ8+TG+tflz4OnVdNqb2+jAauxszQfOql7Phg5QgicBuzZK0g44/8goqx42FB+LeZTcuXK5l3KPXafdScPvvy73Nl/Uq6/97k0vPauVGx4Tc6vWC8/zF4uf8ueK3/PUqhR/48pM6Q0To36J+ZK3YRsuaxEHyP/qyPT5Ybi5vA0uaWuHWJvBN/BifyE8KPXq2cBBmD6P0lXJN0ZGDhN49MZaOsQOBUP019t4m8qpKsj4PVlx7j367fXkLo/s30v+O+a59f+HPvf/8AlJtKb2OojsN/f4Pc1VIzI2D7rTdp79nsDr98760/n+8Hrp+fvqU6/aS/QjqBtcUbfSXIfsUiqjTEjcMRw6aj05Jnyfd4iKV7/mlz9/JhqIu3tZjRiNXaWy+99poMKEPwVS4JuftaVW5UVDxp6iDhlp2z5RuUau7/6kv998jv5r89OyX+8e1Ce7vxIHm15W26t3i5XF66XuvwVUpE2V6/xIydxKV6n5emZACRTwHp/7cRMqR2f5XQIxmfrnQ04kAezAXVjUttmAy6rDgJiAQCSMcAvqHgIQkEnATEBDoltHQX3DIFZGjAdgkeqspuZgicDnCUE0NYp8LzquAK87wg12tdrbJ6GOQB1P33w+7ztWehgloH0DsEE3f0dX3uwz0Mj4Dlw0dci25u0J+j+fjA+06jvGnzqpUe4dZ1X7QDaBQwmsHsKs4uNo5xIdLQ7mJVELBJmh6tzF0vr2tfk8cdHVTNnb/tiAauxs1Rs3SVVE7P09C1uhPsmmhsdWOHCg/YqZqjgQUS5MUNRPi5Tiua+oNxi91Wk8uD4X+Xu5yfkxvv7pGn3R1K3fY9Ubdopxau3yvmla/VswD9y58s/sufJPzLnyj+z5sl36vW79Dk6x3/Z1OlSPynf0xHIlEblpytjMvReT8Qa6B0AI9L1sg382KqE3jtD4CwNODEDBm+goIkh0K8eEEdgOglmFqFtNgEdBs/PeG3rRLh/9jQqBt1hcDU25r1piLzPkPO86/dYVvA8I+H6/EcfgcLSvj1UOvq7zrqusQeIWQ/N4Ji/25edCPO/8Yrn3lka8/WXtnsE26lHjlZo0Vb1xMz8oR7rUbf6+abq/F8fkabbCAweIN4/ZsyRf81YIhXrdkjLx4dU02Rvr2IVq7Ez1J38RkpXb9ajNjSkuFnmJjo4NzZaBR2/q7MKDUrWUz7ncxYqt9h9Fcv8v1/+IP/f4b/Kf31yQv7Huwfktzc+lifb3pF7G96Q1hdekWuLNsjlmaukRvW0y1PnSGmi6gQkzNAgEhWzBaXx+VIalydlcTl6xgA9dICZg+oJWXKpjQx9YALA7EGt6tHXqs4DQGAMevi1o53ZBEOD6vk7Mwup+uQkLJtgVsEhSSdM0h2NIYhB8F2SwHOPxsl5jpzn3f+5oqD3Fr5CojtVmLbVIhIMp0Ou40T09/xfXR044BImvYzkem37XOGeLbLNHMGGazOv2qaeGf/XjjBltH3WFWzX0YYpn+fVmUXz+g/vTYfYdI7RcUYdcUbaSbpOYRcP6pquf54RN+pu9eQ8HReEWUHECtXNXCE31+6Q3/d8Jv/PF9+ppsTevhAHq7EzNB36Qkrmr9bBVxgV4UZbK1YAHX3eN5iH2vaZL6oSK/BQP1CNu143V8Lz+NhflVvsviLdx+PT/5DHR76WBwe+kDt7j8q1dz7XMweXd74n1dt2S/WW3VK6druUvLhFzi1fJ2cXr5Wf1HP645wV8u+ZS+XbnHk6vkCTOUf+nuGZWVAjgB9TZ0ph/HSpjMvXS0lO5yHX03HIaes8IPAQnbiro9L0bAEascBnJzyf81hAi5Fqj7DL44HqcDuzPM7MjvvVO+OTqEeI5hV251V12jADZPDYwV0lYG67GWkGw8wUmdkiI3jtvfY2tusw6LVrVQ5TXseHjv8Qa2M6uToOR42wW5VoXxuZokfZDaozjdm58inZ8lPyDFXn5uj6h9m9kjWvSP3OD2Juzbu7sRo7w80Dp+Ri9gK9toEbrnubukL5TkEFEvmCrhsLVTEh5pgOurP7U+USu59IZPG/Tv9bbzf8z/2n5M9Pj8vTDw7Kk3f2yb2dH8ntHe/LjS1vyo0NO6Xlha1ya84aaR2fLQ9VQ4YOHp4P7xQoBb2vQP2EkN8YniaXVYcMHTSM/PToLw67RAr0jA9o2y0yJUdqJnsxs0Du2SB/0MFzzxDVjs/QM5bAmSlK95kxAtgHrcHPHpw4FBeuGSQze+SPe2bJ9r4z4P/oXTH436MzNG3XNw4dWE+ZUEZTduUT+A07esoSputZNLyWJc3S8Th1Bcvl6pL10vrSq/Jw+zvy255P5L+rTrh/fSPdg9XYGW59clTOq5t4dUSq7s0FF8Nwb9j8r8/3PTonwD1tijVX9EQrJ6qK//Kbyh12H5HoBoE4Talz9IgEyy/eOmCeIfdzRXqCP55LkD+fNzsfnNkziDlyY9SmzJH/e6rj6dr7X/5dnij++PKf8h+n/yFPT3wjdz4/IXf3nZR7ivuqc/do/xfycN8puac6ebc/PiK3PjosLe/u0zNEV/fslYY33pfG19+Thtfel5qtb2qqNr8hZete1TNG5eu2SdHql6V09Va5sGyDnFv0ogajVOShwPowZo8AYlLMLJLeqWIBs0rPRPY8Z4YqS/0vBf4nruH7WSvkp7mr5OziF3WMTNGqLVKz6U1p3PGuXNv9sbS+v0/u7D0sT458LU9Pcyo8XLAaO8P13Xv1ljVEILqnHAODNMK9YfO/PvPe2JwtFibwA+tFWEutwhTSonXKFXb/kOjn+uEv5FLmQrk+PFlv3aOg9z4QdABf//qcswsCa7XYh/zwzU/UbbLfO0KiCauxMzRteVMqJ2VpcUNARHBBD1ecRgDX7cbbEBu8vwMxx7pRzdg03av29wmJLa4fOy01WciUqATdb5bK+zwZAp8n8ux4BV35u7+zwwFTyBdmLVe3yH7fCIk2rMZQuXT8K7m8crNeI0IgBCqSb+MVCTgNrGl4vQ2waXgNjh1rpBBzBHlcTJ+t3GD3DYkdrp78RqpyFsnVEclaSJznx8H7PBm8zxPpPiDmv/83ZxCBpT8MMJBkpOXTI+oW2e8bIdGG1RgqDUe+kNrZq3RAHKIesW6FCmUfnUdiQ+b0+tum8hBkoxoLpBZE4pVHnzIikzhUFSzVCXQg6L/17zjPPekuvO0K9mRjUIHIa3S4q2euVLfGfr8IiUasxlBpOnhCRzI6h7JEo6A7PX9cN8pmItqx7aL51XeVC+x+IbFH1YwVWtCxlQezOBT03sKpn/A3ZkIwOkd7hKjr3/edULfGfr8IiUasxlC58slhveUD01uoSL6Cbd7b7eGXaMP/Or2goXCCbJKkbGK2VL6wSRXf7hMSm2A0qAV9YJInF4M/vs8UE810H6bzhI4UOlRIJFS6dK26LfZ7RUi0YjWGSs2uD3RAHNbPIXi+DZe7MQu0R4qgGzFH4gQkEonGtK7k2YGgN1HQ+wzUUyyH6U73tHy9/cz/HhES7ViNoVKx6XWpGZ/uTDN6GjH3mrOtIestvNdh/zzw+gKvF40EygUxR2NdkjZHFdvuCxLbVM5SI3TEkvhNuQcTbgp6R5j6GFgvA+jvpHbF2jmSoFxZ8bK6Jfb7REg0YzWGwuWjX0jxkpd0BUIgULQIOhritik8VSYkp0DeYeQW/48jX6ui2/1BYpva+S/qQCwj6Hh+8BxR0LuKqZ/+9TQQ+BtLfs3DU/TJW//763+rW2K/T4REM1ZjKFw7cEIu5i7UjRimuoygB6uAvd2Ahfr/jHj7X7cOsFEj89ZhqTot5NW3mZyCBMcRdM9slUfQgXkOQ30eY5XQ/eNbT399fqrOC4GlDiR5qnx5p7od9ntESLRjNYbCjY8OyYWE6d6Ur20VzbfCGcK/QXOuGwKvxXzANGkZlqRjBC6vf00V2e4HQkDdgrUU9GcgdP942xfUUwCf44CcohQuiZHYxmoMhas73pOSyXlyXY1gETQWqYLuP0JHA2EywVWOT9N5jP3LTog/wQSddDfe9sXUVR0INzlHLvM8BRLjWI0dcenk19KwZrue4ro52JPDva2ieSucm94WdNN7t33mjyPq6pr7Oce/Imq/EVtf8ni2OQmNuoXrKOi9grd9gZ+x3IcTxs5kzlO3wX5vCIkVrMaOQEBc7ZzVcmVMho4Ahwj6i2e4jsi9BHY8UA6c93tlRKqUps2R//rqX6q4dh8Q4qZx6SYKerfi1M/AdsSxo73BUh863/q0w9eY6IkQq7EjkCGuPHWOzsikc1f7CSOINEFHA4GyXB2eps9JfrT3qCqqvfyE+KMFXXdwHUEPdXaIBCO4oKO9gX/ReWoamSbFWQvULbDfF0JiCauxI1r2n9AHHyBDHM4E965De+lI0Dv6vKf483lnK9HT55xpdm8QXIJO64py1W9ipCzpHE0rt0ijGqEHE3S8p8iHTjB/IV879p1jmQ9HNuPo5ptvfapugf2+EBJLWI0dUffmRzr6G42XkyEusOKFq6B7/y/E3DkdzmSYqpyQKSVL16si2stNSDCaX9gql8c4pw4aQXd3dIMJFOk88C9m0+pHp0nhTB6PSojBauyIovXbpWZ8prNe2M8Z5fpXut4W7K40mPg+rv/W0GSpmpAuF2bzbHPSNZpWv6KTLLkF3fbMkWD4TrEHth3O52hrMIi4OSRJ54e4vvewcr/9nhASa1iNHXFmzkrdeGFk+3SA/ajIcBF0XJu5Pv/rRMOAnj6iZC/kcB2OdJ2WtTvk8rgMLeioE3gWbfWCBMMRbPzcnqDDr3cHxus6i3S7/veBkFjGamyPh0e+knOJ03UiByRf6euRiKn4OlDG0yC4wbS6aSjc4LuIaMc6HA5zeHSUaV1J17n20qta0O8MSeYIvQu01/l3fOnUb3TCEetSFJ8njz87rlxvvx+ExCJWY3vcfmuvPg8ca85I6hAugm4qvP/npmfvtmGa/VF/JebD0/S03Z1dH6mi2ctLSChcVYLeMD4z6Bo6aR/3qNzdpuif+8OPzvIelvlwPGrx4heV2+33gpBYxWpsj6Y12/QxorrhUhUMlS3YlHZ44CvoEH1EtCMhTtWkXKnYwLSu5NmBoLfVC1dHF69ugSJ23ILups1/qp1BvcXOmopp0+Xu0dPK7fZ7QUisYjW2R1XBcmkeif3nSUFGxOGGV9DRMGDKrnVIilwalykV89eoItnLSUhnuLFhJwX9GQgm6L8jTkf5Dz69PThBx+7UL+FOFEJsWI3tUZyQLzeHp+jesn/lCwecToZzbWggsG8VMwd/9FcdkP6Jcn9QstSNSZMzuUzrSrqP65ve0IIefA3d+1ySzgF/or3BQVCFSTPkj2PfKJfb7wMhsYzVGIz6jw/o9fM7QxL1+nk4TrHbZg10Dx/rbzqta4oUp8yS379hWlfSfUDQL41L19upKOjdC2bVbg+M1/6teWmbcrf9HhAS61iNwSjZ9JpcmpClt3qh0bJVvvDCGZ3jWrHFDj380vh8uffhflUcexkJ6QotL78hteMzfATdt8NLQbfj7xdfH8GPaG9wqmNZwnR59OXflbvt94CQWMdqDMZPBUt1diaIIxqt8AyCM8SpxsBJE3lXXSsahMopedK4hUcsku7n6sbXAwRdpyltex4p6HaC+0XPrA1M0j5FzEvzi9uVq+3+J4R0QtD/OPatFMZPl2bP+nnglGJf4zQM7uAaXCOm63RaV5zItOJlVRR7+Qh5Flq37g4Q9MBnlISKjn9RPsTgAQewXEibJb9/8Q/larv/CSGdEPS7r38o1RNy5ObQZC2S4SzoxobrRL557FtlzmfSk9x85S25NIGC/uxgVsOZ2dD1d0iyVE3MkprNu5Sb7b4nhDhYjTZwPGST5/xzk9oysDL2Bf5Tds57k4QCGe2KU2erItjLRUh3cP2V3VIzKdM5gdAj6OG9JBUe/PEcOuHu+uuA4FZsjW0eoepv+jzlYrvfCSFerEYbpanz9Do0psDcyWT6nkBBh5gjkAbLAwik+f3ASVUEe7kI6Q5atr4p1ROyfATd9zklNmyCDt85S2UpUj4pR65s3aNcbPc7IcSL1ejP7aNfSeXUAp1dDeef+wpo34POBRoBAzodWDfHFrum3UzrSnqea1vf0lPDFPTO4tchV4MF+O/BoESdRObnPOaLICRUrEZ/al7do9fPkZRFp3tVFTDcphPRgGLtEgF7OghuUpbUvrhVXb69TIR0J7dee5+C3iW8gm7qMDrk8GPZ1DypeOM95V67zwkhvliN/vy4cJXUjslwtqtpQbdVzL4FjQFmD7DGXz0uQ87y8AbSi9zY8a5UT8qmoHcR+As8eT5e7g5OlsZRqVKau1i51u5vQkggVqM/36fNkoaRqWG6XU3RP14H6kHMcU5yURbPNie9y/VX39GzQuFyCmGkoQVd1WG0MTjSuGJytlxTPvX3MyEkOFajm9ZdH0rZ5BxpHZaqGqrwE3Rcz6N+cToIDmldkev56aEv1aXby0NIT3Bl864ggu6dUiZ2zPIdptuxMwXJq4qmL5HmfUeVa+3+JoQEYjW6qV34kjSOTtfTYJhuDydBx7WYRgAR7eVx+XJ991512fayENJTNHgEvXUY8jRQ0DsL/KXXzpX/yqfkSt32PVJz4ivlWru/CSGBWI1uSpJmtm1X8zZS7pSWfQeuB1N014alSMnkHKnn2eakj0BK4XK/Eboz8qSgt8fv/RL1nnOchIhBAyLbK6Yvk8ufH1FutfuaEGLHajS0HvpCKibn6jOenwzAdjVUQm8mp77EiDkycyEIrpRnJJM+5MrW3QGC7jyrFPT2cQJtH/VPUh3zVCmZmitXtr0llce5bEZIZ7EaDaUbd0rN+Ex50LZdzVYhexpLg9g/Xl8PguAaR6VJac4idbn2MhDSGzRteUMHcjEornPAT4jNwZbYutEZUjx7pTR8eli51O5nQkhwrEbDz9nzddS4jm7vs1FGoKCjwUQQXNPIVClLmS3/k4c2kD6k8tRX0rz5DUa5dwXVOUddbhmu6vLUPKl7/X0pPXxCudXua0JIcKxG8D+P/FVXMGwhQQ8aomrLudx9+Au3/3sHNJS6ARiWJGXT8uXOXkbCkr6l5thpacFs1kTuQ+8M8BFm2m4NSZW6sZlSNXeV1Ow9pFxq9zMhpH2sRtC69jW5PCZdT2s70+19L+gmExzEHGldb6revP91E9Lb1B45JVdWbNaihJgOCnpowEeozwi6RWrplu1vS/n+Y8qldj8TQtrHagTlGfP0NBhOPPqtX6KORv3zeRMY1/N4zzV3hB2VH5ngbg1N1hm5KtZvV5dpv3ZCepP6QyeldvYquTIaHeAE3fGkoHeMSfN6dWS6NM5cLdd3f0pBJ+QZsBqffPMvvRcU0e2YboeY94WgOz876/eIssfop25sulTOXaUuM/C6CekLmvYdk4q0+Z4OsHt7J2kP00m/oQT93rz1cnPLHml65zOp239cKk6eVq61+5sQYsdqrN62Wy5NyNKNk5luN9mc/EfO/pX0WdF7Uv3+ro6CHZyoM0id4+lLJMxoen+flE3Kk5tDnfTI7me3p+pJNABBxygddfvayDSpHZ8l5fHT9Vr6lR1vy9XDp5R77T4nhARiNX6ft0iLp4lud6+d96agmwqPTHBNI1KkNHmW/PnNd+oSA6+ZkL6g6sRpqX75Dakan63jTZwAUvcz3TP1JFowdRxT75gRxCxH7Zg0KY7LleIFq+XK5wx6JSRUrMYzyTOleaSTux2NUU8Hwz19zn4Uq6noSOtaGl8gDz/k/lQSXjQcOiUlC1+S+jGZuuOJZ9Y38RIFvSMg6jiYBctqmBXE0trVEamqk5QpRVkL5dZHrPeEhEKA4cmBU7p3jO1qvR3dbqb18YpKDjF3Tl7KlStb96jL871WQvqalk+PyPm0OTrBEZ5XCvqzgdk5DCTgSyxhINkMEkfd+JzBcoR0RIDh6QcHPec6p+j8yv7r2b0BxBy99RuDk6ViQrZULd+kLs33OgkJB5p3fag7wDhPQC9RqWfXPMemg0pCwZtS2kzDPxzoCYTFFHz2QnlwmIFyhLRHgOH3jw5L1aRcLejoKbsbqN4A/w//997AJD2NWThzpbos32skJFyofXGrVI7L0MKDGa3eri/Rwu/Kb8D7Pl5+Vx0kdJKQrKdmrBqpc3cLIe0SYPivr76XwvjpesRhT5DR/VOIT59z9cxVowgxxxpaWfpcdUm+10dIOFFZsFxPt2P93Cbm3iBSYsO9e8bYjB/xirV1nRlyaIqUTMuTS+/weGRCgmE1mhzu3jVBNz23Joj/hcqLILiKadPlvx/6Wl1O4PUREg5cO/GVlCTMaDteGCNK8yxzur1zGEHXIu7uGPWP1wMLdPKRie/HGUuV6+33g5BYx2os3PS6VE7I1ucT99a0O/7HfVV5cbhF5ZQcufHWJ+pSAq+NkHABo8WKqXl6ut1//TxYx5cj9mA4/nILup52V2CUjuNVm1XH6UL8DHl8+Cvlfvs9ISSWsRrBxfS50jAy1bO31q/X3E2YyvuoX5wT0T48WR9B2aQ6FP7XQ0i4UfLSNn28MNK9BtaRQIECFHRfvDMZdn8BvMfAAnE9VRNz5M6uj5T77feEkFjGagQPPzkuxYmzpGl4qjwYlKinw82UolMJnQronlp0/+x+r1/V6NtdUfEz/iZGNlh/NNvTitZsVf/efk2EhAvN+4/LubxF0jAa6V7V86xGkXiuKdjdj24r+iXocxwujVMdqFffUbfAfl8IiWWsRsO1XXuVqM+Qy2qkbqYVMRKBEKOCtWHeq1cj1AY0dAA/P1Ejcbyit42/hSl9BN8hM1R54kxp3vym+rf2ayEknGh551O5OC1fmoejXijhUR1WiA8FvXvBYMAIOjLJXR6XIbc271K3wH5fCIllrEY3dw5+KWcy5+ltI9g+gulFBK49GJDkwrx3hNp57wVr420/q9/FND6mzxpHp0txXL6cn71cfj31D/Xv7NdASDhRffy0NK5/XaomZuk64T/dDhEywu4Wd/d3KPwO8InbL/64BR3tRoNqh+6w40+IFavRRumCl3REb+WETLk0Ll1HnLrBnnHNWPWZGnED9KaR6al2VLpcGpWivpeuD2DAPnf8rYo5q+TXfSfVn7f/T0LCkbqDJ6Rm7mpHXDzpXv1FiYIeGh0Jehv9EvWMHgWdkOBYje1Rv2evFL/4ipSs2e6waoucX7peLizbIBeXb5QzC1bLD2rEbfjn9EXyt9z58m3efPllyYtSsel1af38hPpT9r9PSLjTsO+olKXMlusj0nR8CQTJxIuQzhGqoCNjJbauXRmTIfdepqATYsNqJIQEp+6tj6V8Sq6OK8F53lg/p6B3jY4E3fjVLej3N+9Wt8F+bwiJZaxGQoid2mOnpfLF7Z7takn6zAEIzp/PO+vmbjEi3YMW9X6JbWvod7dQ0AmxYTUSQuxc3XdSSmYs15kUEeCJ9XOIjntNnKP17kWP4tUI3Qg6R+iE2LEaCSF2bn94WIoSCvRZA4HZ4UhP8OvzcW2Cjp0xdza+oW6F/f4QEstYjYSQQKpPfiXXtr7lOY0Q29Uo6L2BGaHrNXQl6LfXM5MkITasRkJIIHVHv5D6JRv01kwkOTHb1SjqPQyS9vRLlPuDkqV5bCYFnZAgWI2EkEAa9x+TiqxF0jwyVe4OdLIfUtB7HjNCh6A3jcmQu5xyJ8SK1UgICaTh/c+lbFqBtHqOS4XIUNB7HiPomHKHoN/ZsFPdDvs9IiSWsRoJIb5UHf9aKl/eKdWTsvV0O7arUdB7HuwYMIJ+V/kcgn6fiWUIsWI1EkJ8uXzwpJQsfEmvn+N0QOQWtwkQ6RwdpcA1gm5SvzJTHCHBsRoJIb7c+OSoXEibI82j0vR0u9l/Tp6NjgQdQNDRgUJmvrpJOfJw98fqltjvEyGxjNVICPHl2s4PpTQuT5/bH0vb1UIR3O7kdzUSB973zggdSxzXh6VK0bTp8j9O/V3dEvt9IiSWsRoJIV5wXGr9qi063StGiXq63XP+ebTT24L+2/MJPoIOMBvycGCiXB6ZKj9kzFG3xH6fCIl1rEZCiJfLh09Jdf4yaRqZpiOtEaDlFpxIRgec+cw2oGztlS9O051Cb0uVa2xmdI4scTi6uXQr188JCYbVSAjx0vjpISmNd7arPR6QrAXdJkLRQUeCDrpX0IMBMX+sRuc65euoNCnOWqBuh/0eEUIo6IR0SN1bH0rlxBy5MyRZr593LHiRjH/5zPv2y9x5gXf+pjO97vxtdyfJiDl2FDSNTJWi5Jny5MApdTvs94gQQkEnpENKX9oql8Zlyv2BnvXzDsQtkggUYv/ymfeBZdbT9cquX9vBnVFPo34HfjQ87Z/oMCBev0en6X7/eJ0vv360GpmnzJLfDnyhboX9/hBCHKxGQojDnRNfy8W8RXrK98EAI+huofMVuVjBiPLj/kn61LlApnlI0Nv8fD5TvwNfgocDk/UrOks4jhYxCrcGJerdBFXjs+VM7kJ5dOpbdSvs94cQ4sVqJIQ43N17WG+Vah6WqoXIGxAXm4KuR9xKyCHAtwenyA0lvNeUb5qHp7TRNCJFGkamSN2oVD3CrhudIXVj1KuiXv0MYKsdo17HZupXUDM2Q4l4plRMzZOipNlyee0OdQvs94UQEojVSAhx0MelTsyR1iGpejTqFXR7dHak452CD+ywmFE5RtLXR6RJw4QsKZ+Sqzs8F+Ly5OK0fDkfny9nk2fKP9Nmyl8zZ8u3WXPk25x58s/pi+S7gsX69ftZK+Sn+avlx7lr5Ie5L8iPC9bI2aXr5fzKTVK26Q25+skR5Xr7/SCEBMdqJIQ41C5YK5fHpMudQSlKzKJry5oNm6Cj44LgNZQdU+ZI8FI9JUeevPyW3H/rE7n90UF58PlJeXLwC/n16Dfy2+l/KtfZ/UkI6TmsRkKI/OXGya+lLGW2tAzH6WqBYh4dI3SvcHcEgtWwhQzT5BULXpRr+44rN9l9RwjpfaxGQoj8pfGDfXpKGdnhnO1q0TjNHpqgY+0cwW3o3JRMmy6Nez5RLrL7jRDSN1iNhBD5S9WmnTpIC6NSI+jRhtlKZvvMYALh0LHB9r1LC9dK/YETykV2vxFC+garkZBY59YXf5eiuS/oKG0EgXm3q0UXHQn60+fi9Ofo0NwYniaVUwvkzht7pfr418pNdt8RQvoGq5GQWOfe/lNyIXGmNI/E+nmCZ/08OkW9PRAgpwV9YKK0jEqXa3PWyL2PGIVOSDhiNRIS61x77X0pm5yj91ljdPp7/yQlcLEr6DggBSP02zNXya2tbzMgjpAwxGokJNapX7FFR3PfHpzUlrrUJnjRh30mAj54MChR7z+vnZgtpWlzpG7tq3Lz6GnlLrsPCSG9i9VISKxTmrNIro5M1+vnsSPmwC7o8IEW9QFOcFyzEvaqSblyLm+R3GAiGELCAquRkFimad8xKY3L04eDIJGKv7jFEv4noD15Pl6nwEXqVxwni5StxenzpHUvRZ2QvsZqJCSWqdqxR6omZsmdQc7JX26BizXcgu787Bx5qrPGKWHHkgRytF/Imi/3jnD6nZC+xGokJJYpWr5B6sY60+3OdjUnyt0/U1wsA3HHkaeYwbg5NFkfrFI8a4Vyn92nhJCex2okJFa5dewrOZs5VxpHOdvVKOi++I/YMQ0PP2E3QOmUXKl68wPlRrtvCSE9i9VISKzS+s5nUhyXK9eGpei917EVENcVnGUJnGNeOyZNfp6+SLnR7ltCSM9iNRISqzSt3yGXJmTpSG5MKVPQA3GP0s3sxcP+8XJ1RKpcSJgujw9/qVxp9y8hpOewGgmJRS4fPiVVBculcVSa3BukhKodMfceMxodoKxd7bzg93Rq2MGJUjkpS27seFu50+5jQkjPYTUSEos0fHxASuMLpGVoijzsYLqdgu5g1tERa4CI98vjMqRl/Q7lTruPCSE9h9VISCxS8+oeqZyYI3eGJFu2q3mC47oofNGCf/lxeMtv/eO1oONUuitj0+Xqqq3KnXYfE0J6DquRkFij9siXUqK3q2XKgyFOule3kFHQHfzLb0boWEdHYNyV0WnSvHKzcqndz4SQnsNqJCTWwGEjhTmLpMFzupoj6Gr06RIz4hZ0+Mbxj7Eh7uDq6HS5tnKLcqndz4SQnsNqJCTWaHlrrxTG5evtao8GGNEi/tgE3dgh6M2j0qRh8XrlUrufCSE9h9VISCxRffy0NK1/Xad7Rf72x5bT1aItCM7gFehnA1PuyO9+VQl60+INyq12XxNCeg6rkZBYov7QSames0ouj0nXgV3OdLuzZm4Ei4LePkbQm0emSv28F5Vb7b4mhPQcViMhsUTjZ0ekJGmmtAxP1aJkUrz6CrivwBMvOjDOI+hILlM7e5Vyq93XhJCew2okJJao3fWhVEzOlVtDkz3HpdqEm4LeHhD0BwOSdKeofhYFnZC+wGokJFaoPXZaKtZs1eleMd3u3n9uUpx2x5R0tAMfYXfA9WGpcil/uXKt3d+EkJ7DaiQkVmjef1yKZi6X+tFpznGpfvvPu2uNOdpxC3pN3jLlWru/CSE9h9VISKxw4/19cjGxQAdzefefO/geQkLseJcisFzROixZKjLnK9fa/U0I6TmsRkJigeqTX8mVzbukfFKOzt8OQeJovLP4CvrNoalSnjFPudfuc0JIz2E1EhIL1B45JXUL18nlsVk6IO7JAB6X2lm82/kS2gS9NHmOcq/d54SQnsNqJCQWaNx/TE8PY7odechxwAgFvXN4t/Z5Bb2Ygk5In2A1EhIL1L3ziZROydXZ4fyn2/UpYp6f7XinmokDjpy9MTxNqvOXKPfafU4I6TmsRkKiHaR7rdz4ulRbtquFBgXdYE5cQy73htGpUr+EudwJ6QusRkKincYDJ6Vo/iqpH5PZNt1Oge4Kjt+QWAYzHWWTc+T6mx8qF9v9TgjpOaxGQqKdlk+PyPnU2XJlBLarUdC7yu/9ErWYY4ajaXiq/JQ6U7nX7nNCSM9iNRIS7bTu+VRKpubKtWGp8qi/yd8euqB7o7tjG0y1Q8wx3Y5sez8sW6vca/c5IaRnsRoJiXYa127XAnRzcIoT3d5JQSdGzKfJHSXmTSNS5GLSDOVau78JIT2P1UhItFNZsFyaRqbp9XP7VjUKfEcgqx7S5ULMMdvRsPUt5Vq7vwkhPY/VSEg003ToCymaNl1ah6XqrVZdEXT8jv33wgtznRBfTT8nvW3Q145Q38MUu95zPiRJ58AvSiiQy1t2Kdfa/U0I6R2sRkKimerdH+p0r3eGOMelRoIwB6W/s2XMvHev7Wsx75+oy4iRNNa5MSNxf3CifjXvfV47Qn3v9uAkZ7/5hCw5l79YHh7/RrnV7mtCSO9hNRISzZSs2iKXxmVqgcIacCQLuhZtP0E3PyOVLfbY4wS0y2PSdcyAoXZitsZtC06G1IzP1AJeNSlXyuPypSxjntzZye1phIQTViMh0crtY3+VwtzF0jgqre10tUgWdC/eJQKd6EWNzDGabh6VLk3Zi6VhzStS+fJOqd6ySyq37pLqV/Y4bNstNdvfkkvb35HaV9+Vuh3vSf1r78vl1z+Qyzvfa6PxjY+kYc8ncvPwl8qNdt8SQvoWq5GQaOXOB4ekJG6GXBvmnK4WjYKOMqFsLcNTpSxhhvzXoa9U0e3+IIRED1YjIdFIzbHTcm2TGqFOyJbWISlRdbqamXoHTwbE661kmCJHelt/PxBCohOrkZBopP7QSames0oaxmbotWVEbEedoCsxR2zA1VFpUpQ2WxXb7gtCSPRhNRISjVz5/KiUJM3UU9GI+o4WMQfmgBTMOtwY6uRUv7rjHVVsuy8IIdGH1UhINFK760OpmJyr909H/HY1DxBy8zMC4dBRaVCj83N5i1SR7X4ghEQnViMh0UbtsdNSsWar3n7lPS7VCSKLZIygI3UtOinorFRNzZfGtz9Vxbb7ghASnViNhEQbVw+ckIsFS3VmM4xisX4eDYKuQXIZVRZsU2sYmSqluYtVke1+IIREL1YjIdFGywcH5EL8DGlWgof9585hLBZxjECwdIAZh5ahyKmeL/c+OKiKbPcDISR6sRoJiTaaNr+l070ifzvEL5oC4jDbcF+NzutHZ8jF2StUce0+IIREN1YjIdFE/bGvpHbROqkfm962Xc0mjJEIOiaYccC++oqpeXL3wClVZLsfCCHRjdVISDTRdPCUVGTOl6sjsF0tqW26/elzcQECGUnobWr94vRhKYgNqJqzWhXX7gNCSPRjNRISTdR98LmUTslVo1hnu5o757m/SPpjTi9zn2IWLkDQUZ7m4SlSnDhDfj/MU88IiWWsRkKiifItb0jVxCydDhXr57/3S7QKpI1wFnScFIcy1YxNk/JlG1VR7eUnhMQGViMh0UTJ8g1SNzbdtV3NLpDhCmYS3B2KPzxBfVg711nhpuXL/WMcnRMS61iNhEQLD7/4u5xJnytXRqfLw4GJ+iQyI5Ju0YwkIOYox+3BCTrQr4Gjc0KIwmokJFq4+/4BKZma23ZcKsQQovjHcwkaf7HsbUKZyvfvfLjXzguTZsifp/6mimovPyEkdrAaCYkWmje8JpcmZOiUqO7955Ei6G2pXdV1G3A86t3BiVIzPl1qVfn8y0wIiU2sRkKiharZL0jzqDR9pCiOFvUXzPDFNxofGEF/MChRrg9PluLE6aqI9nITQmIPq5GQaKEooUBahyXr9XOIYaBwhiuOoLun23H9iGzH9rvqCVlyZdPrqoj2chNCYg+rkZBo4PJHB/RxqUi84pyu5i+a4YR3RO4DDl7xdEQQCIfIdhyP+kv2fFVEe7kJIbGJ1UhINFC+foc+LtVMt5up6wDRDAvsgm6m2cGvA5N056RyYo7U7HxfFdFebkJIbGI1EhINnJmxRC6PSdejWrNdLSLxHI+KtLVIX1uSwdE5ISQQq5GQSOfpyb/J+aSZ0jTCu10tfEfn7YNrx5LBjaEpUjUpV1p3fqCKaC83ISR2sRoJiXTuvLFXT00jgAyBZBjl+gp6kDXrMMFsZ8M1m7VzzDacLVimimcvMyEktrEaCYl0rix7WRpHe45LVYIYOEIPf0HHK64ZMwy3hiZLZVy+NH14UBXPXmZCSGxjNRIS6ZSmzZHrI9LkkRJ0iDnEMRKPS0Vn5P7gRGkamSoV0zk6J4QEx2okJJK5e+pbKZuap0e1GN1iuh3i6B6h+47WwxN0RB4NmCYtw5J0eR7vPayKZy8zIYRYjYREMnW7P3Adl+qI45/POyeW+YtmOIPRObbc1Y5NlcKFq1XR7OUlhBBgNRISyVxYtk5qx6Q5x6V6BB1iDlH3F81wBaNz9/God4+eVkWzl5cQQoDVSEgk81PaLGkcleZzXGrgYSzhEhSH9K6JPjaIOc5tvzs4WepGpUrtgrWqWPayEkKIwWokJFJ5euhLKYzLl5ahKXrvtgmIC2dB978OZLXD2v+1kWmCXPR/HufxqISQjrEaCYlUWje/KfXjMvR2NWRXCybcEHoj9uEErgnHo2LtHGlri156RRXLXlZCCHFjNRISqVTnL5Frw1L0+rNXzCNH0BGRj+NRm4enSGHyTFUkezkJIcQfq5GQSKU0Pl9u6uxwvkePhi/YG+/sj0cHA2vnN4cmS/mkHLmydbcqkr2chBDij9VISCRy5ZPDUjklz7NdLXBUHo48fW6q6ng4PyOADzMLCOg7kzlPFcleTkIIsWE1EhKJFK9/TS5NyNLrzxjp+oqnfeq9r/HOIjidEKz9Yw/95d0fqyLZy0kIITasRkIikR9zFkr96LS241J9U72Gp6AbzPGozSNxPOpcVRx7GQkhJBhWIyGRxv/58jspjS/QAXFIl2rSvQbSt8Luv66v36trfTIgUR+PWjolV+6985kqkr2chBASDKuRkEjj8RsfSe34LB0Qh33cwSPYw2Ok7hZ2zCYgqx1mF87mLVLFsZeREELaw2okJNK4vGidXB2dodfP7aPz8BByNxB1TLUjiQw6IhWTs+X2vhOqOPYyEkJIe1iNhEQa2LN9fViqXj+3j87DS9C1mKvrhKDfG5gkjaNSpaJgiSqKvXyEENIRViMhkUZxfIEe5WK0C7E0U9o4lCVcT1mDoCOyHWlqS+Py5NfPODonhHQdq5GQSKMsYbrcGZLos/8coh5ugm46GsC9dl409wVVDHvZCCEkFKxGQiKNksTpaoSeoKPFIZZ6Ottn6j38ptzN2nllXL48Of5XVQx72QghJBSsRkIijeKUWdI6LFkeD0xsE/NfPSlVHcJL0HF99wcly+Ux6VK78CVVBHu5CCEkVKxGQiKN+oXrpGlkmg4wQ6AZBNM9vW3D+Tx0ocf32/ub5vP2vqPx7DvHnnms/f/X6e9UEezlIoSQULEaCYk0Hr9/SCom5+rkLFhHd45OtYipwldwn33k3qGAK8x30NHA9aHjcWlcppQs36Au314mQgjpDFYjIZHIT1nzpHF0upP6tR+i3RPlj+cSNEZUOxJfM11v+ywYHf1N53Onk2EC4fToPHGGumx7WQghpLNYjYREIpff/kTKphVIy/BUnRf9NyXo3TEC7wxWce/vJJDBNDvEHGedl0/JlcZX9qjLtpeFEEI6i9VISKRSvGSdlE3M1nu7EUWOEXGAwIaE6Qh0rkPgPwuA0T6uQU+zD3L2nOOs83MvbFKXay8DIYR0BauRkEjm3NwVStQz9UhYn40+0Nmf/lgJK0bJeMWUvP+rP/gdH5vr+87fc8DfNN952j9RYz7D9D+u4dqQZKkbkybl8dOlbu2r6jLt104IIV3FaiQk0ilctl6K4vN00pYbQ5Pk9uAkLaw4bxyv2DJmXu8OTtSvCFRzg+/62NT3Hbv5OyBF/X6q7/f0d5Lk1tBk/b+xNa1kWp6cm7FUHhz7Wl2e/ZoJIeRZsBoJiQYe7z8p5bNXSlHyTC3uSK8Kyqblt/2s30/NkwpF5ZQ8qZ6cJzVt5Ej1pGxNzUQH894hV3/v0uQCuTQlX/+M38ffKps6XUoSZgj2x9cv3yh/HDqtLsl+nYQQ0h1YjYTEIo+/+Zf8euof8vjI1/L48Fch8Z9ffif//fS/5H989W/5j6/U7//13+pP2f8+IYT0JFYjIYQQQiILq5EQQgghkYXVSAghhJDIwmokhBBCSCQhf/n/AWjQ51L9Tp0BAAAAAElFTkSuQmCC"
    Private AvionImage As Image = Nothing
    Private Moving As Boolean = False
    Private Rect As New Rectangle
    Public Sub New()
        Me.SetStyle(ControlStyles.OptimizedDoubleBuffer Or ControlStyles.UserPaint, True)
        Me.Size = New Size(350, 40)
        Me._ColorRectangle = Color.Blue
        Me._ColorPiste = Color.Black
        Me._ColorAvion = Color.Red
        Me.AvionImage = CodeToImage(_Avion, 40, 40)
    End Sub

    Protected Overrides Sub OnPaint(ByVal e As PaintEventArgs)
        MyBase.OnPaint(e)
        Rect = New Rectangle(0, 0, Me.Width, Me.Height)
        DrawRectangle(e.Graphics, _ColorRectangle, rect.X + 1, rect.Y + 5, rect.Width - 3, rect.Height - 10, 10)
        Using Pen As New Pen(New SolidBrush(_ColorPiste), 4)
            Pen.DashStyle = Drawing2D.DashStyle.Dash
            e.Graphics.DrawLine(Pen, Rect.X + 12, Rect.Y + CInt(Rect.Height / 2), CInt(Rect.Width - 14), CInt(Rect.Height / 2))
        End Using
        Dim progressWidht As Integer = CInt(((rect.Width - 40) / (Maximum - Minimum)) * Value)
        If AvionImage Is Nothing Then Return
        AvionImage = ChangeColor(AvionImage, _ColorAvion)
        e.Graphics.InterpolationMode = Drawing2D.InterpolationMode.HighQualityBicubic
        e.Graphics.SmoothingMode = Drawing2D.SmoothingMode.HighQuality
        e.Graphics.DrawImage(AvionImage, progressWidht - CInt(AvionImage.Width - 40), Rect.Height - AvionImage.Height)
    End Sub

    Public Sub DrawRectangle(ByVal g As Graphics, ByVal _Colors As Color, ByVal x As Int32, ByVal y As Int32, ByVal width As Int32, ByVal height As Int32, ByVal radius As Int32)
        Dim area As Rectangle = New Rectangle(x, y, width, height)
        Dim path As Drawing2D.GraphicsPath = New Drawing2D.GraphicsPath
        path.AddArc(area.Left, area.Top, radius * 2, radius * 2, 180, 90)
        path.AddArc(area.Right - (radius * 2), area.Top, radius * 2, radius * 2, 270, 90)
        path.AddArc(area.Right - (radius * 2), area.Bottom - (radius * 2), radius * 2, radius * 2, 0, 90)
        path.AddArc(area.Left, area.Bottom - (radius * 2), radius * 2, radius * 2, 90, 90)
        path.CloseAllFigures()
        g.DrawPath(New Pen(_Colors, 3), path)
    End Sub

    Private Function CodeToImage(code As String, width As Integer, Height As Integer) As Image
        Dim _image As Image = Image.FromStream(New System.IO.MemoryStream(Convert.FromBase64String(code)))
        Return New Bitmap(_image, New Size(Width, Height))
    End Function

    Private Function ChangeColor(image As Image, colors As Color) As Image
        Dim bmp As New Bitmap(image)
        For x = 0 To bmp.Width - 1
            For y = 0 To bmp.Height - 1
                Dim GetColor As Color = bmp.GetPixel(x, y)
                If GetColor.A > 100 Then
                    bmp.SetPixel(x, y, colors)
                End If
            Next
        Next
        Return bmp
    End Function

    Protected Overrides Sub OnResize(ByVal e As EventArgs)
        MyBase.OnResize(e)
        If Me.Height <> 40 Then
            Me.Height = 40
        ElseIf Me.Width < 300 Then
            Me.Width = 300
        ElseIf Me.Width > 600 Then
            Me.Width = 600
        End If
    End Sub

    Protected Overrides Sub OnMouseDown(ByVal e As System.Windows.Forms.MouseEventArgs)
        MyBase.OnMouseDown(e)
        If Rect.Contains(e.Location) OrElse e.Button = Windows.Forms.MouseButtons.Left Then
            Moving = True
        End If
    End Sub
    Protected Overrides Sub OnMouseup(ByVal e As System.Windows.Forms.MouseEventArgs)
        MyBase.OnMouseUp(e)
        Moving = False
    End Sub
    Protected Overrides Sub OnMouseMove(ByVal e As System.Windows.Forms.MouseEventArgs)
        If Moving AndAlso e.X > -1 AndAlso e.X < CInt(Rect.Width + 2) Then
            Value = CInt((Maximum - Minimum) * (e.X / Rect.Width))
        End If
        MyBase.OnMouseMove(e)
    End Sub

    Protected Overrides Sub OnMouseEnter(e As System.EventArgs)
        MyBase.OnMouseEnter(e)
        If Cursor.Equals(Cursors.Arrow) Then
            Me.Cursor = Cursors.Hand
        End If
    End Sub

    Protected Overrides Sub OnMouseLeave(e As System.EventArgs)
        MyBase.OnMouseLeave(e)
        If Cursor.Equals(Cursors.Hand) Then
            Me.Cursor = Cursors.Arrow
        End If
    End Sub
End Class


Aucun commentaire:

Enregistrer un commentaire