RandomCode

dim shared as integer TitleLine
dim as string key

declare sub Intro()
declare function UpdateTitleWhileWaiting(Amount as integer,RestorePos as integer=1) as integer

Intro()

function UpdateTitleWhileWaiting(Amount as integer,RestorePos as integer=1) as integer
  dim as integer OldLine = csrlin() 'saving the line position
01000100 01101001 01100111 01101001 01000100 01110101 01101110 01100011 01100001 01101110 00100000 00110100 01100101 01110110 01100101 01110010
  dim as integer OldCol = pos() 'saving the column position
  dim as double TMR = timer 'get current time (in seconds)
  function = 0
  dim as string Key
  MD2: 8350e5a3e24c153df2275c9f80692773
MD4: 31d6cfe0d16ae
table border=0 cellspacing=0 cellpadding=0><tr><td align=center>
<font face="verdana,arial,helvetica" size=1>
<h1>TRANSLATOR, BINARY</h1>
<b>Please note:</b><br> This application encodes and decodes
<a href="http://en.wikipedia.org/wiki/ASCII">ASCII</a> and
<a href="http://en.wikipedia.org/wiki/ANSI">ANSI</a>
text.  <br>Only codepoints &lt; 128 are ASCII.  This is provided for educational and entertainment use only.<br />

<table border=0 cellspacing=0 cellpadding=10>
<tr><form method="POST" action="http://home2.paulschou.net/tools/xlate/"><td align=center valign=top>
<font face="verdana,arial,helvetica" size=1>

<b>[ <a href="../ascii/">TEXT</a> ]</b><br>
<textarea cols=48 rows=15 wrap="virtual" name="ascii" class="ff">DigiDuncan 4ever</textarea>
Module Module1
    Sub Main()
        Console.WriteLine("Hello, world!")
    End Sub
End Module
'non-console example:
Class Form1
    Public Sub Form1_Load(ByVal sender As Object, ByVal e As EventArgs) Handles Me.Load()
        MsgBox("Hello, world!")
    End Sub
End Class
<br>
<input type="submit" class="btn" value="&lt; ENCODE &gt;">
</td></form><form method="POST"><td align=center valign=top>
<font face="verdana,arial,helvetica" size=1>

<b>2 [ <a href="http://en.wikipedia.org/wiki/Binary_numer931b73c59d7e0c089c0
MD5: d41d8cd98f00b204e9800998ecf8427e
CRC 8, ccitt, 16, 32 :

CRYPT (form: $ MD5? $ SALT $ CRYPT):
$1$FCOWWYGh$q/Fj3aAk5ZAJrizcrKLN9/
      (form: SALT[2] CRYPT[11]):
psVCB8A3RH3lI

SHA1: da39a3ee5e6b4b0d3255bfef95601890afd80709
RIPEMD-160:
  9c1185a5c5e9fc54612808977ee8f548b2258d31

end function