logged in.
you MUST have a teletab in your inv to use this script!
Terminating.
Successfully executed.
The following bitmaps were not freed: [6]
i have a teletab in inv.
FreeBitmap(guiBackground); is bitmap [6] this is the error found in the script below
boxText := BitmapFromString(205, 255, 'meJzt0kENACAQwDD/bvBwVvhj' +
'ARXsQbpUwmYk6Z/WPvCIzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMg' +
'M0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQ jYjI' +
'DNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0 I2Iy' +
'AzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDN CNiM' +
'gM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAz QjYj' +
'IDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM 0I2I' +
'yAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjID NCNi' +
'MgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyA zQjY' +
'jIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMg M0I2' +
'IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjI DNCN' +
'iMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2Iy AzQj' +
'YjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiM gM0I' +
'2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYj IDNC' +
'NiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2I yAzQ' +
'jYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNi MgM0' +
'I2IyAzQjYjIDNCNiMgM0I2IyAzQjYjIDNCNiMgM0I2IyAzQjY jIDN' +
'CNiMgM0IjJR0ATBdy20=');
proggy := BitmapFromString(216, 130, 'meJztnT1O5EwQhuc+pBvtPQg3' +
'3XMgTsAZJpiACBGQEZCNtBESARLJJEgOkEBoJAICf62voLap/vWMx' +
'/aax3oCmJlud1e9rur2XzfLRQMAAAAAAAAAAAAAAAAAMAZPy0X7 fN' +
'K27dPt3eiNwQI7026O22Brbs5Hb5jy4hrZnoeNdNu7M/7lyT5eCLv' +
'v6mwuTwbr3fvtUaoB0rbtc9ssjzI1zECH2oV/VIdvzvjL4351OLAF' +
'UgeCumZ/Hb7dLMRWzfJ4dG/mu/CyaUdvTL3X/NbuGQ1MzFHNF73fb' +
'4/22d28dShf+YnPmCsaS6Ue6bhulaUc20tX8E4/Dw2b16HGFuPWTL' +
'WhDCRR6ieH60tRh6azqd3lLWDirT/qKJrl6eZ8mIxf1GEbbPLLzLf' +
'RNFosFXo86r6MDqN1FqtNxUMpftC+dNJhZnf5lqR0WGMWU9UA OszY' +
'OTpslkNJQ73EEC243ZyoVf2kkC8lu9OBmflxUYfRdharjY4PV RUH7' +
'UvU420QyqTOmt2lJjhhXq43yzDj5Bod6jFS6YUmFkaKpUyO0M 3MXm' +
'vGh2E7M9VmZHDovvSuw6gFojqsNMtgs4aavBztXVTAcuxEc1m x1Lg' +
'69IN8mz2geuyL36Pd8rLs7jvrMHSQBvCMETKlxDLFc3e76TBT rZGB' +
'xBkziDpQXzrpMLO7nXVYNMv0dSh/R9tpei09KpYyEwTBqcI4qKsOi' +
'9Xm5ykH7UsnHWZ2V6lDX3WVZhleh2HA7xoP9ZfRmF8s1cSuLI QO6q' +
'rDYrWhDOQT8dpB+9JJh5ndFS3gl1U11phlyLPKqet6NfEwWrD 5ek5' +
'ge+v8eF5TqglOJoR22EGH+WpDGaj2pMLD9aWTDjO762QBPyoW zTL9' +
'qxsf5zk/O155UWO3UtNk4L7MyXS9m8VslbOMrqWmycB9mZPpIr1jY' +
'6vb0CHbFLbRYyYAAAAAAAAAAAAAAAAAAAAAAABMn+jDU9vn9m V5pA' +
'9ojN5ImD3oEKaDPG+I6mBcQh36n8jfL5vWf9eZBMyPO8k/n6CMPj+' +
'r77Wbx5M+cDhqdJh5oiH1M//9MOgQilTqUOKe/84N+Uo0Zl6IIT+b' +
'1HuPYeLU6NC8vsN/04XoMPr+CnQI9fSiw8wLggBq6EWHjA9hT3rRY' +
'RO8qwodAgAAAAAAAAAAfFvkPedcQIFxkRPa+h57zlTD8PgXWd AhjI' +
'V/VwM6hLHwby9Eh7An/rKqEuKebu9EV9vn9u3myNzkL5g7H1SHb7c' +
'n0YcCXFXt5mN1P0QLIXqHzNPNuZNHZqXXcPGscM0jfzPLc8uG DiGF' +
'v/ha/m4uvbnaJWVfSGbtLX8l63A9dIAoKpUwz6rS/NGgyMxfrzCqW' +
'6bS0ImPFbGf/67PHtWVWUfVX3YQHcKeqGZelscqtuJ4z+iqkw5RJo' +
'T4q6zq3Fml8r45N5OU6LU8dAiHICMVvZY3eiNh9qR0yGtwYEh InQA' +
'AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAC9sF4uFo9n i9d2' +
'/edh+tV+K1bOhq9XP17b5uJs9Mb0guuOk0SI6+P64myaOvzx52f Y2' +
'v09og1b3X95ddXi/rf78PTRffgzZ8m6n/XmuP93Z5r675LS4S+nk+' +
'XvaepQXDApHWrZwXR4euF89+Dc1Cx/D7C7wQiPr/VU8/KBIs96v3g' +
'4MKvPGNJcX43emB7J61BDkO+OX9cLPyjpV1LQz+zht6pDOa71 35UX' +
'olNRLi8MrVDw1S4F19dX0QNhXafDVAt9A+Yt4O/Lp2uSnVlqLuowa' +
'q5VLKf7XkgV9HWolYiPwjqjYsvoMBw6+p0yCd14sEaHmRaGOi xaIK' +
'9Dc0CFP5POTi1QH06HetT7HnHfnt6fmdgow5ViQRNm1ZJmzOP +PX1' +
'8SOkwFIOKxHjKNCOVy2p0mGlhVIdRC5hKpJFhWKvU4cyGiDXj Q19s' +
'TSwkGh1GC/710eODMaNv+cywJ6VD2YufK80gKp/I6nUYbWFUh1ELV' +
'OqwiHHHPOiqw2he7qRDxXeoGXNG5zKpvBz6pXcdZlpYr8PQAv njLg' +
'U6dB03RojaOe+FlcvLiXMd6yCvZYRh/OIX0fBVo8NozeuEOMMW1us' +
'wPISjIiQv76BDKd5Jh+5bM1l2PwunpaGPUjrU2szExDQyo0Od 5mjL' +
'9RNpRqaF9TqUv4uJmHlKjQ6jVuqqw+brVMKkvNTBnpkvh0PHV OqMo' +
'm0zpJJySuR5C0SHNDucTf1u521S8xTfKacuyb5e7aBDM8n1T7 ykMk' +
'7+/KE5deOH00rHGTEbhaRa2DUehnQaIs71PDYMxsfp9E+Jrne6wDT ' +
'LSQoMSXTw0PUS+SyTMgyMkWLXsDa/+74AAAAAAAAAAAAAAAAAAAAA' +
'AADA5z8+trza');
guiBackground := BitmapFromString(500, 500, 'meJzt3TuO4+aax+FelNfjrUzg' +
'VXgFDpzMAjo70UmcO7BhA4MGXED34Bgw0MEBNAUIR0Pz8vHjp f6S3' +
'npePFF3tUhR5K8o6tIfPhhjjDHGGGOMMcYYY4wx5sz5L2OMMU 872m' +
'6MMfVG240xpt5ouzHG1JuetvdfpTfGGHOv0XZjjKk32m6MMfV G240' +
'xpt5ouzHG1JuDbf/v//lfAO5O2wHq0XaAerQdoB5tB6hH2wHqeeu2' +
'L92IMcaYE0fbjTGm3mi7McbUm3u1/eXn7wE4l7YD1KPtAPVoO0A92' +
'g5Qj7YD1KPtAPVoO0A92g5Qj7YD1KPtNFz+/Hj5z/z19fLy8493X6' +
'Ua/v35x9uG/fz5y93X5y3Yee5L22lweAY27IO0/fRfN3ae+3rktv/' +
'12/eXy5fL2vz7cnn57ae7b8mHNTzEOud2JN7l8Ox53B+kh7u99Xl7 ' +
'57FzW/S/Xh/ry6+3P//6ekz9/PHgOmj7fT1y24f7f3tePv169y35m' +
'D6/HmJff+rcjNND+y6H59dP33eu5/MW/q3b3nns/OvPy/XnR78LTj' +
'lf0vb70vbaarf98rR5f7S2P9p5+2i/va0n/Qq03TWZtqe7JrOp7U/' +
'66A/v41ucmXQeO8NfKw91vV3bj3uitjs5P8sono0N+whtH63etFrP' +
'eOCH236XY0fb70vb36GnbvvLZMd4xmu52t6m7cfVa/ttjxo+Wx9dl' +
'2jvKj3XqKe3sPQsuP30dt+ylpbYeZn0YNs3bcwdq7q6eqMX/ma78e' +
'APx+0+Ll1Tmn2jS/+lkh3HzmqKt26cfTvP6hW5pV8Tm7b/tBL1PnF' +
'Qvu1Lx/jSMdV5dXq4g/Vc25xd+R3L6tn/Vwu/u+1fP23bmPtW9WDb' +
'n+LhuN2F6aYbvay5uvSzjp1223dsnH07z+rDN92eO7b/sBKff/tp9' +
'DurxtOEwm1fnekO3P/OnNu/7XwjyvQQ3rGs/n/Yzvu+tm9aySOruv' +
'WazPAs6xkfjqHV9b9L2/dtnH07z9a279v+w7Zfvo6fH2l7uO2re8X' +
'WPery931+dL609LGO0aPf/ybDYYL2Leul+zMpl+bzyrdo+/R2dq9q' +
'e/VGqzSq9DM+HI37Pp1823dvnH07z6YtsHv7t9dN2x+h7Y3fyNOd Y' +
'XrgDx/E4U41enCHu9D0cb8ucfWp+vAH9i1ruv7DPXa0nx+5oH18Yx' +
'5Z1YPvb3+6h2Npnx8t7trSfW2fndEqLbX94HExu83bO8/0B2Zje2T' +
'7T9etRs+Hyre9sTeO/rbxYsrwFGX38+ulJ579yxqt/DRrox9Yivbu' +
'tvdvzCOr2t/2TW//eNiHY2mfP/IBop5jZ/SUZ6ntu4+L3TvP9MGaD' +
'e+R7b/j/QBP59nb3r4mM/3bxgHeeX6y6d1cB8+FRssa/qvZly+Xnj' +
'6PnPUeyM6NuXVVe9q+7019j/lwNB6a2c3e48S27z4udu8807+dbe+' +
'R7f8evg/hidq+47XUTXvU0mnAaA9Z+hW/6VWwfcvqf0lrujMPBdp+' +
'ZFU7z9sPvpH1cR6OztXedG554jWZ3cfFW7f9yPbX9nfV9p69p ef0Y' +
'GmOL+t9tv22etMXzmbv4NM9HO3NPprOoyD8PpnZ40Lb70vb+/fhI2' +
'E/ZVmbdub+95zfve2jVW2s3urXFT7jwzFr6QS+83aSbe/5qMjd295' +
'5AaoSbZ+/RPz6fLXjFHG6ko23Wp27rCPfkRVu+9ZV3fQeyPZ1kqd4' +
'ONqmz1Z2fBD4SNv3bZwjO8/0b1fbvnX7a/u7avvslxVsWlz/Jcd9y' +
'xpFb/cno8OvpW5d1fbq9b+37VkejlXtDM46se37Ns6RnafzLh/Z/t' +
'r+fto++vN9l0aHO//0OfXxZU0vOMyez1xXqXF2F2j7kVVdXb3Rqfv' +
'SddRneTim+/xoHe7Y9t0b58jOM/3bzsuh/dtf2x+q7Y1ZeufqvvP2' +
'zgVtXcnjy9q0uPu2/ciqbv0+meGp+zM+HEsbfGl6AvsW5+1bN86Rn' +
'aex3H0v62j7k7a9/xXwTaeaszM6hej/1PPxZU3XvzF3b/vuVV1dve' +
'ktN95LszSP83AsbfDZ2fH51sup3znQv3EOtn3prbDDLbB7+2v 7u2r' +
'7S98pymXLZ+T/+vzldlycsqz+f3v698nsODz3rWrP6nV+gcBoHvPh' +
'6N/n+z+peu77ZPZtnIM7z1K3932FVOer6pU8ctv7z8H6r8k0fmDTV ' +
'xu1r4he/rOfD895zlrWzb6vKH859f/m6DxGNq1qz+qNNvioKs/1cL' +
'Tv/nWOvNeo89+eflycsvOMtkbjvmza/tp+37Ynrb7m3n5z3cMuCw+' +
'HjfM+afvVcBed/T2+47tBHmFZeDhsnPdJ26/apx8978h6zGXh4bBx' +
'3idtv+q/tn/85CS5LDwcNs779Jht79yXjDHmLebuZdZ2Y4w5fe5eZ' +
'm03xpjT5+5lrtp2AI7QdoB6tB2gHm0HqEfbAerRdoB6tB2gHm 0HqE' +
'fbAerRdoB6tB2gHm0HqEfbAerRdoB6tB2gHm0HqEfbAerRdoB 6tB2' +
'gHm0HqEfbAerRdoB6tB2gHm0HqEfbAerRdoB6tB2gHm0HqEfb AerR' +
'doB6tB2gHm0HqEfbAerRdoB6tB2gHm0HqEfbAerRdoB6tB2gH m0Hq' +
'EfbAerRdoB6tB14V3547d6fv3748/LNn5eXX366+/oM/fN13T7/9L' +
'pur15+//XITWk7HPfNpx+vx+N3ny8vP/+YXPS3v39/XfS3rzX4+eP' +
'dN8Xju22xV//89OXu6zNy25d++ONy5Ha0HZZcz+7arkUt2fbvfnm9' +
'5S+z9zpzxvvD4CGYjfDtvm9an2HbD54bv4XbZj+4kbUdlmj7U tszV' +
'Xyjtj/yNZmXv1+WOfK0QtthibaXPG9/fKdcltF26NF+Il++7Xe5dv' +
'Fu237KY6rt0GNT2z/88bHxat3wSffSbd5u8PrnjRuc7cBS9Ia3s/q' +
'Uf1Pbh9tn6ZzzdoOvf9XzhpAjbW/c09kL2v0bfPTzb/GM5pRL7toO' +
'PTrb/s3ny/Q6xrBy0wbO/tj//7L49GvnDd7aPmzy7XnE0gWWRt472' +
'/5D8+LV8B/ebvC7Py7D327ntn31nrbbvrrB2/d36e7M/kJf+ofDRe' +
'x+xqTt0KOz7avnco2f7Pyx0U+O2j5syPAC0eg89qy2ryZr+Gx iqbr' +
'ntn31nrbb3v/QXP9wdKeWzrQ3tf2Ul1O1HXr0t/12dM++j/r6h7Nn' +
's8M/33qDt4reyjaM6uw7Q65/2Nn2pWIPV2l4cjt7TWN0g6tnpDva3' +
'nNPV9ve2OC36k5v/0Pz1ZZNbR9uwN0vp2o79Oi9JjM45DvPvmZ/rP' +
'8Gh23/9vePs2ePSyfzbT1tvyVodLOzSxzeYM/p6I6299zTdtvbG3x' +
'327fSdsjY8T6ZRtuXrgBM2756g7MX8HuuGq2eNjfafl2r9i+v 2xKn' +
'LwR0vkS475rM6j1dud6+tsFv1Z1ekzn4SdIhbYeMs9re/kDQkba/p' +
'ubD5y+jnM6u5PT0e9bq9fb2S373avvqPT3Y9qXXUs99D6q2Q8 YpbR' +
'9ddJ3+4ZG2v7blu18+rp5DjrrXuIywqe2N8/bpNZkdbZ+9O9NfHz3' +
'39GDbZ59zrRbY9XZ4TKe0fbYqJ7Z9+AnZpSCP/lUjs6ttb1zcHv7V' +
'rU5b2z68kWm9h+Vv/Iaa3tMjbd99aV3b4TGd2/bhjcy+pWR322d7e' +
'C3S7Ju0j7T95e8nscNT9+Gduv3bHR/JGd7+7Dt/RovuuadH2r50SW' +
'31goz3QMJjOqXtqx97Od72l7n3JTaWe+SaTM89Gt7+jrav3n6 7+bN' +
'rcsp5++qaHOGzSxBz1mup7c/InNL2l8l7ORpFaqSj83OpjU/ajlq3' +
'76P07VefR4vouacHr7c37m/7d2U/3zkAMe3Dbem7wm6Nnf0+k9tf3' +
'XLRbvvsDc62ffoq5DR6qxXa9H0y00+DTv/JkWRNi7p0I6v3tL/tsx' +
'v8+iej3yntV3W38l1hAEnT38JXZ/2HGle+4xcgafYrHdrv59nK/80' +
'BENZ+ueRgja/8n3oAYe33yZzynQP+L2yAu9j67Q39ev7Lkk7aDlCP' +
'tgPUo+0A9Wg7QD3aDlCPtgPUo+0A9Wg7QD3aDlDP3dtujDHm7 Ubbj' +
'TGm3mi7McbUm3DbAcjTdoB6tB2gHm0HqEfbAerRdoB6tB2gHm 0HqE' +
'fbAerRdoB6tB2gHm0HqEfbAerRdoB6tB2gHm0HqEfbAerRduj 3D2O' +
'Cc2Rf1Xbod+9j3byvObKvajv0u/exbt7XHNlXtR36nXLQQZu2Q5i2' +
'E6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2 g5h2' +
'k6AtkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBG g7hG' +
'k7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthO g7RC' +
'm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg7hGk7AdoOYdpO gLZD' +
'mLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg7RCm7QRoO4RpO wHaD' +
'mHaToC2Q5i2E6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu 0EaD' +
'uEaTsB2g5h2k6AtkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i 2E6D' +
'tEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h 2k6A' +
'tkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg7h Gk7A' +
'doOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg7R Cm7Q' +
'RoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg7hGk7AdoOYdpOgLZ DmLY' +
'ToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg7RCm7QRoO4RpOwHa DmHa' +
'ToC2Q5i2E6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu0Ea DuEa' +
'TsB2g5h2k6AtkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6 DtEK' +
'btBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6 AtkO' +
'YthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg7hGk7 AdoO' +
'YdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg7RCm7 QRoO' +
'4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg7hGk7AdoOYdpOgLZDmL YToO' +
'0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg7RCm7QRoO4RpOwHaDmH aToC' +
'2Q5i2E6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuE aTsB' +
'2g5h2k6AtkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtE KbtB' +
'Gg7hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6Atk OYth' +
'Og7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg7hGk7Ado OYdp' +
'OgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg7RCm7QRo O4Rp' +
'OwHaDmHaToC2Q5i2E6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYTo O0Qp' +
'u0EaDuEaTsB2g5h2k6AtkOYthOg7RCm7QRoO4RpOwHaDmHaTo C2Q5' +
'i2E6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTs B2g5' +
'h2k6AtkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbt BGg7' +
'hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYt hOg7' +
'RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg7hGk7AdoOYd pOgL' +
'ZDmLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg7RCm7QRoO4R pOwH' +
'aDmHaToC2Q5i2E6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Q pu0E' +
'aDuEaTsB2g5h2k6AtkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q 5i2E' +
'6DtEKbtBGg7hGk7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g 5h2k' +
'6AtkOYthOg7RCm7QRoO4RpOwHaDmHaToC2Q5i2E6DtEKbtBGg 7hGk' +
'7AdoOYdpOgLZDmLYToO0Qpu0EaDuEaTsB2g5h2k6AtkOYthOg 7RCm' +
'7QRoO4RpOwHaDmH/MCY4R/ZVbYd+9z7WzfuaI/uqtkO/ex/r5n3Nk' +
'X1V2wHq0XaAerQdoB5tB6hH2wHq0XaAerQdoB5tB6hH2wHq0X aAer' +
'QdoB5tB6hH2wHq0XaAerQdoB5tB6hH2wHq0XaAerQdoB5tB6h H2wH' +
'q0XaAerQdoB5tB6hH2wHq0XaAerQdoB5tB6hH2wHq0XaAerQd oB5t' +
'B6hH2wHq0XaAerQdoB5tB6hH2wHq0XaAerQdoB5tB6hH2wHq0 XaAe' +
'rQdoB5tB6hH2wHq0XaAerQdoB5tB6hH2wHq0XaAerQdoB5tB6 hH2w' +
'Hq0XaAerQdoB5tB6hH2wHq0XaAerQdoB5tB6hH2wHq0XaAerQ doB5' +
'tB6hH2wHq0XaAerQdoB5tB6hH2wHq0XaAes5tuzHGmAccbTfG mHqj' +
'7cYYU2+03Rhj6o22G2NMvdnadmOMMc812m6MMfVG240xpt5ou zHG1' +
'Jv+q/TGGGOMMcYYY4wxxhhjjOmZ/wN9nfvK');
end;
procedure EndDTMs;
begin
FreeDTM(lobsterDTM);
FreeDTM(teletabDTM);
FreeDTM(swordieDTM);
FreeDTM(sharkDTM);
FreeBitmap(proggy);
FreeBitmap(guiBackground);
FreeBitmap(boxText);
closeFile(fileName);
end;
function WalkToCentre: Boolean;
var
tmpTPA: TPointArray;
tmpCTS: Integer;
group: T2DPointArray;
tmpBox: TBox;
begin
Result := False;
//SMART_ClearCanvasArea(IntToBox(MMX1, MMY1, MMX2, MMY2));
tmpCTS := GetToleranceSpeed;
setColorToleranceSpeed(2);
setToleranceSpeed2Modifiers(0.00,0.12);
if FindColorsTolerance(tmpTPA, 126702, MMX1, MMY1, MMX2, MMY2, 7) then
begin
group := SplitTPAEx(tmpTPA, 12, 12);
SortATPAFromMidpoint(group, point(MSCX, MSCY));
tmpBox := getTPABounds(group[0]);
//smart_debugTPA(true, group[0]);
can anyone help me with this?


Reply With Quote



