<?xml version="1.0" encoding="UTF-8" ?>
<?xml-stylesheet type="text/xsl" href="https://www.dotnetzone.gr:443/cs/utility/FeedStylesheets/rss.xsl" media="screen"?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:slash="http://purl.org/rss/1.0/modules/slash/" xmlns:wfw="http://wellformedweb.org/CommentAPI/"><channel><title>WinForms</title><link>https://www.dotnetzone.gr:443/cs/forums/12/ShowForum.aspx</link><description>Θέματα για rich client / windows εφαρμογές, σε οποιαδήποτε γλώσσα (VB.NET, C#, managed C++, κ.α.)</description><dc:language>el</dc:language><generator>CommunityServer 2.1 SP3 (Build: 20423.1)</generator><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16688.aspx</link><pubDate>Wed, 13 Sep 2006 20:51:19 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16688</guid><dc:creator>sovilo</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16688.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16688</wfw:commentRss><description>Σε ευχαριστώ θα τα κοιτάξω μήπως βγάλω καμιά άκρη.</description></item><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16645.aspx</link><pubDate>Wed, 13 Sep 2006 01:29:35 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16645</guid><dc:creator>gmlogic</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16645.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16645</wfw:commentRss><description>&lt;P&gt;&lt;A href="http://esupport.epson-europe.com/FileDownload.aspx?lng=el-GR&amp;amp;ID=18162&amp;amp;data=FF9D054DCD0D6CF34F7B34272CF34C082EB5CE9992B24759BB51971DEE559FD6"&gt;http://esupport.epson-europe.com/FileDownload.aspx?lng=el-GR&amp;amp;ID=18162&amp;amp;data=FF9D054DCD0D6CF34F7B34272CF34C082EB5CE9992B24759BB51971DEE559FD6&lt;/A&gt;&lt;BR&gt;&lt;BR&gt;ρίξε και μια ματιά&lt;/P&gt;
&lt;P&gt;Έψαξα και για το manual αλλά δεν το βρήκα&lt;/P&gt;
&lt;P&gt;Το βρήκα :)&lt;/P&gt;
&lt;P&gt;&lt;A&gt;ftp://download.epson-europe.com/pub/download/81/epson8148eu.pdf&lt;/A&gt;&lt;/P&gt;
&lt;P&gt;Αν θυμάμε καλά είναι κάποιος συδυασμός πλήκτρων όταν τον ανοίγης&lt;/P&gt;
&lt;P&gt;Υπάρχει Dump HEX Mode&lt;/P&gt;
&lt;P&gt;&lt;U&gt;&lt;FONT color=#800080&gt;&lt;/FONT&gt;&lt;/U&gt;&amp;nbsp;&lt;/P&gt;</description></item><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16631.aspx</link><pubDate>Tue, 12 Sep 2006 23:40:28 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16631</guid><dc:creator>sovilo</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16631.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16631</wfw:commentRss><description>O printer είναι Epson FX-1170 αλλά έχω την εντύπωση ότι σε όλους τους dot matrix τα ίδια θα τραβούσα.&lt;br /&gt;
&lt;br /&gt;
Δοκίμασα και το n1 as byte. Τίποτα.&lt;br /&gt;
&lt;br /&gt;
Αφού δέχεται εντολές όπως new line, bold και τα λοιπά σε decimal γιατί να έχει option να εκτυπώνει σε HEX.&lt;br /&gt;
&lt;br /&gt;
Άσε το άλλο(μόλις τώρα το είδα).&lt;br /&gt;
&lt;br /&gt;
Του έδωσα εντολή για line reverse ESC ] όπου σε DEC 27 93.&lt;br /&gt;
&lt;br /&gt;
Αυτός αντί να κάνει Line reverse μετακινήθηκε δεξιά. Αν του στείλω 5 Line reverse μετακινήται 5 θέσεις αριστερά!!!!!!!!&lt;br /&gt;
&lt;br /&gt;
@#$%#$^^&lt;br /&gt;
&lt;br /&gt;
Λοιπών το βρήκα.&lt;br /&gt;
&lt;br /&gt;
Αφού δεν μπορώ να τον μάθω να πηγαίνει στην θέση που θέλω, θα τον μάθω να πετάει....&lt;br /&gt;
&lt;br /&gt;</description></item><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16624.aspx</link><pubDate>Tue, 12 Sep 2006 21:55:20 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16624</guid><dc:creator>gmlogic</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16624.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16624</wfw:commentRss><description>Μήπως έχει ο Printer option να εκτυπώνει σε ΗΕΧ γιατί θυμάμαι παλιά υπήρχε&lt;BR&gt;&lt;BR&gt;για να δεις τι ακριβώς στέλνεις και τι byte λαμβάνει γιατί λέει το n1 &amp;lt;=255 και δοκίμασε το Dim n1,n2&amp;nbsp; as Byte&lt;BR&gt;&lt;BR&gt;Ποιός printer είναι?</description></item><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16622.aspx</link><pubDate>Tue, 12 Sep 2006 21:14:51 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16622</guid><dc:creator>sovilo</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16622.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16622</wfw:commentRss><description>Κατ’ αρχήν σε ευχαριστώ για τις απαντήσεις.&lt;br /&gt;
&lt;br /&gt;
Ο τύπος που μου έγραψες είναι ίδιος με αυτόν που χρησιμοποιώ. Αλλά το πρόβλημα δεν είναι πως υπολογίζεις την θέση μετακίνησης (τουλάχιστον όχι ακόμα), αλλά πως στέλνεις το n1  και n2 στον printer.&lt;br /&gt;
&lt;br /&gt;
Από τις προσπάθεια που έκανα διαπίστωσα (όπως αναφέρω στο δεύτερο post) ότι ο printer δέχεται ένα ψηφίο για το n1 και ένα ψηφίο για το n2. Τα υπόλοιπα ψηφία τα εκτυπώνει. Ας πούμε τώρα ότι δεν με ενδιαφέρει να υπολογίσω την ακριβή μετακίνηση αλλά θέλω ρε παιδί μου να μετακινήσω την κεφαλή του printer με την εντολή της  ESC $ n1 n2. &lt;br /&gt;
&lt;br /&gt;
Ε... ότι και να βάλω στα n1 και n2 ο printer δεν κουνιέται, εκτός και αν το n2 = 7 ή n2=8. Αλλά αν n2 =7 η κεφαλή μετακινείται 5cm και αν n2=8  μετακινείται 10cm περίπου. Τίποτα το ενδιάμεσο όσο και αν προσπάθησα.&lt;br /&gt;
&lt;br /&gt;
Όσο για το search στο internet που λες ψάχνω 2 εβδομάδες. Βρίκα και ένα κάποιον που έλεγε ότι πρέπει το n1 και n2 να περαστούν σε HEX και όχι σε decimal αλλά από ότι κατάλαβα και αυτός μπερδεμένος ήταν. Τέλος πάντων το προσπάθησα αλλά τίποτα.&lt;br /&gt;
&lt;br /&gt;
Απογοήτευση:(&lt;br /&gt;
&lt;br /&gt;</description></item><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16610.aspx</link><pubDate>Tue, 12 Sep 2006 19:37:52 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16610</guid><dc:creator>gmlogic</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16610.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16610</wfw:commentRss><description>ESC $ nL nH&lt;br /&gt;
&lt;br /&gt;
[Name] Set absolute print position&lt;br /&gt;
&lt;br /&gt;
[Format] ASCII ESC $ nL nH&lt;br /&gt;
&lt;br /&gt;
Hex 1B 24 nL nH&lt;br /&gt;
&lt;br /&gt;
Decimal 27 36 nL nH&lt;br /&gt;
&lt;br /&gt;
[Range] 0 
&lt;br /&gt;
0 
&lt;br /&gt;
[Description] Sets the distance from the beginning of the line to the position at&lt;br /&gt;
&lt;br /&gt;
which subsequent characters are to be printed.&lt;br /&gt;
&lt;br /&gt;
• The distance from the beginning of the line to the print position is&lt;br /&gt;
&lt;br /&gt;
[(nL + nH 5 256) 5 (vertical or horizontal motion unit)] inches.&lt;br /&gt;
&lt;br /&gt;
[Notes] • Settings outside the specified printable area are ignored.&lt;br /&gt;
&lt;br /&gt;
• The horizontal and vertical motion unit are specified by GS P.&lt;br /&gt;
&lt;br /&gt;
• The GS P command can change the horizontal (and vertical)&lt;br /&gt;
&lt;br /&gt;
motion unit. However, the value cannot be less than the minimum&lt;br /&gt;
&lt;br /&gt;
horizontal movement amount, and it must be in even units of the&lt;br /&gt;
&lt;br /&gt;
minimum horizontal movement amount.&lt;br /&gt;
&lt;br /&gt;
• In standard mode, the horizontal motion unit (x) is used.&lt;br /&gt;
&lt;br /&gt;
• In page mode, horizontal or vertical motion unit differs&lt;br /&gt;
&lt;br /&gt;
depending on the starting position of the printable area as follows:&lt;br /&gt;
&lt;br /&gt;
1 When the starting position is set to the upper left or lower right&lt;br /&gt;
&lt;br /&gt;
of the printable area using ESC T, the horizontal motion unit (x)&lt;br /&gt;
&lt;br /&gt;
is used.&lt;br /&gt;
&lt;br /&gt;
2 When the starting position is set to the upper right or lower left&lt;br /&gt;
&lt;br /&gt;
of the printable area using ESC T, the vertical motion unit (y) is&lt;br /&gt;
&lt;br /&gt;
used.&lt;br /&gt;
&lt;br /&gt;
[Reference] ESC \, GS $, GS \, GS P&lt;br /&gt;
&lt;br /&gt;
Μήπως αυτό σε βοηθήση.&lt;br /&gt;
&lt;br /&gt;
Πάντως ρίξε και μια ματιά στο internet με ερώτηση ESC $&lt;br /&gt;
&lt;br /&gt;</description></item><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16574.aspx</link><pubDate>Tue, 12 Sep 2006 00:29:20 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16574</guid><dc:creator>sovilo</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16574.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16574</wfw:commentRss><description>EPSON&lt;br /&gt;
&lt;br /&gt;
Το πρόβλημα από ότι κατάλαβα είναι ότι δεν περνάνε σωστά η τιμές των n1 και n2.&lt;br /&gt;
&lt;br /&gt;
Για παράδειγμα αν n1= 104 και n2=1 τότε ο printer τυπώνει 41 χωρίς να μετακινηθεί καθόλου. Όπου το 41 είναι από το  n1= 10(4) και n2 =(1). Δηλαδή παίρνει μόνο τα δυο πρώτα ψηφία του n1.&lt;br /&gt;
&lt;br /&gt;</description></item><item><title>Απ: Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16565.aspx</link><pubDate>Mon, 11 Sep 2006 23:55:24 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16565</guid><dc:creator>gmlogic</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16565.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16565</wfw:commentRss><description>Εχεις κοιτάξει το emulation mode τι ειναι IBM ή EPSON&lt;br /&gt;
&lt;br /&gt;</description></item><item><title>Απόλυτη θέση εκτύπωσης σε printer dot matrix</title><link>https://www.dotnetzone.gr:443/cs/forums/thread/16561.aspx</link><pubDate>Mon, 11 Sep 2006 22:11:41 GMT</pubDate><guid isPermaLink="false">2622095e-976c-431a-859e-16783ec7ecd7:16561</guid><dc:creator>sovilo</dc:creator><slash:comments>0</slash:comments><comments>https://www.dotnetzone.gr:443/cs/forums/thread/16561.aspx</comments><wfw:commentRss>https://www.dotnetzone.gr:443/cs/forums/commentrss.aspx?SectionID=12&amp;PostID=16561</wfw:commentRss><description>&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;Προσπαθώ να κάνω έναν &lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EN-US"&gt;dot&lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EL"&gt; &lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EN-US"&gt;matrix&lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EL"&gt; &lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EN-US"&gt;printer&lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EL"&gt; να μετακινηθεί και να εκτυπώσει στη θέση που θέλω. Η Εντολές μετακίνησης είναι &lt;/SPAN&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;SPAN style="FONT-SIZE: 10pt; COLOR: green; FONT-FAMILY: 'Courier New'; mso-ansi-language: EN-US"&gt;ESC&lt;/SPAN&gt;&lt;SPAN style="FONT-SIZE: 10pt; COLOR: green; FONT-FAMILY: 'Courier New'; mso-ansi-language: EL"&gt; $ &lt;/SPAN&gt;&lt;SPAN style="FONT-SIZE: 10pt; COLOR: green; FONT-FAMILY: 'Courier New'; mso-ansi-language: EN-US"&gt;n&lt;/SPAN&gt;&lt;SPAN style="FONT-SIZE: 10pt; COLOR: green; FONT-FAMILY: 'Courier New'; mso-ansi-language: EL"&gt;1 &lt;/SPAN&gt;&lt;SPAN style="FONT-SIZE: 10pt; COLOR: green; FONT-FAMILY: 'Courier New'; mso-ansi-language: EN-US"&gt;n&lt;/SPAN&gt;&lt;SPAN style="FONT-SIZE: 10pt; COLOR: green; FONT-FAMILY: 'Courier New'; mso-ansi-language: EL"&gt;2 &lt;/SPAN&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;Μετά από αρκετό ψάξιμο βρήκα ότι το &lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EN-US"&gt;n&lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;1 είναι το πηλίκο της διαίρεσης και το &lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EN-US"&gt;n&lt;/SPAN&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;2 ο ακέραιος της διαίρεσης από το τύπο που δίνετε από τον κατασκευαστή.&lt;o:p&gt;&lt;/o:p&gt;&lt;/SPAN&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&amp;nbsp;&lt;o:p&gt;&lt;/o:p&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;Χρησιμοποίησα τον παρακάτω τύπο αλλά ο εκτυπωτής τυπώνει χωρίς να αντιλαμβάνεται την απόλυτη θέση και μου τυπώνει και ότι θέλει.&lt;o:p&gt;&lt;/o:p&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&amp;nbsp;&lt;o:p&gt;&lt;/o:p&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;Ξέρει κανείς πως θα δαμάσω τον κρουστικό εκτυπωτή?&lt;o:p&gt;&lt;/o:p&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&amp;nbsp;&lt;o:p&gt;&lt;/o:p&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;Παραθέτω και τον κώδικα που χρησιμοποιώ για να δείτε τις πράξεις για την ακριβή θέση μετακίνησης.&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&amp;nbsp;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&amp;nbsp;&lt;/P&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;FONT size=3&gt;&lt;FONT face="Times New Roman"&gt;&lt;FONT color=#0000ff size=2&gt;
&lt;P&gt;Public&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Function&lt;/FONT&gt;&lt;FONT size=2&gt; AbsolutePrintPosition(&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;ByVal&lt;/FONT&gt;&lt;FONT size=2&gt; length &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Double&lt;/FONT&gt;&lt;FONT size=2&gt;) &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Integer&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;
&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#008000 size=2&gt;'&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;
&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#008000 size=2&gt;'27 36 n1 n2&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; ESC $ n1 n2&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp; Set Absolute print position&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;
&lt;P&gt;&lt;/FONT&gt;
&lt;P&gt;&lt;FONT color=#008000 size=2&gt;&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;length = length * 0.03937 &lt;/FONT&gt;&lt;FONT color=#008000 size=2&gt;'conver melimeters to inches 
&lt;P&gt;&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;
&lt;P&gt;&lt;/FONT&gt;
&lt;P&gt;&lt;FONT color=#008000 size=2&gt;&lt;/P&gt;&lt;/FONT&gt;&lt;FONT size=2&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Dim&lt;/FONT&gt;&lt;FONT size=2&gt; n2 &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Integer&lt;/FONT&gt;&lt;FONT size=2&gt; = Int((length * 360) / 256) 
&lt;P&gt;&lt;/P&gt;
&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Dim&lt;/FONT&gt;&lt;FONT size=2&gt; n1 &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;As&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Integer&lt;/FONT&gt;&lt;FONT size=2&gt; = (length * 360) - (n2 * 256)&lt;/P&gt;
&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Call&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Me&lt;/FONT&gt;&lt;FONT size=2&gt;.Send(Chr(27) &amp;amp; Chr(36) &amp;amp; n1 &amp;amp; n2)&lt;/P&gt;
&lt;P&gt;&lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;End&lt;/FONT&gt;&lt;FONT size=2&gt; &lt;/FONT&gt;&lt;FONT color=#0000ff size=2&gt;Function&lt;/P&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="mso-ansi-language: EL"&gt;&lt;/SPAN&gt;&amp;nbsp;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&amp;nbsp;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&amp;nbsp;&lt;/P&gt;
&lt;P class=MsoNormal style="MARGIN: 0cm 0cm 0pt"&gt;&lt;SPAN style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-ansi-language: EL; mso-fareast-font-family: 'Times New Roman'; mso-fareast-language: EN-US; mso-bidi-language: AR-SA"&gt;Κάθε πρόταση δεκτή.&lt;/SPAN&gt;&lt;o:p&gt;&lt;/o:p&gt;&lt;/FONT&gt;&lt;/FONT&gt;&lt;/SPAN&gt;&lt;/P&gt;</description></item></channel></rss>