Clan x86
Member Forums => iago's forum => Topic started by: iago on May 04, 2005, 11:25:46 pm
-
Has anybody (without using a ROT13 converter) actually bothered to figure out what my signature means? I'm getting tired of it, but I want somebody to decode it first :(
-
I tried, but gave up after a bit.
-
Awesome. It's simple character replacement, one I figured that out I just cracked some of the smaller words until I got a full conversion going. :)
-
I got it now. Damn, you're an asshole iago.
-
I agree with the jew. :-P
-
Haha, I love you all :)
-
It didn't take too long to figure out, only about 5-6 mins.
-
I agree with the jew. :-P
Repent now!
I can't view signatures, so I'd say.. Yes I cracked it like an eggshell hitting the skillet.
-
Someone tell me, I'm too lazy to make something to decodeded it.
-
I knew what it was the first time I looked at it. ROT-13 is what me and my friends use for passing notes in class. Look at my signature too.
-
ROT-13 for passing notes in class? I just use leetspeak. ROT-25 is easier to figure out, but equally hard to understand at first sight.
EDIT:
joe@Pie:~$ rot13
Pbatenghyngvbaf, V whfg jnfgrq frireny frpbaqf (be zvahgrf) bs lbhe gvzr. Ohg qba'g gryy nalobql, yrg gurz jnfgr gurve gvzr!
Congratulations, I just wasted several seconds (or minutes) of your time. But don't tell anybody, let them waste their time!
EDIT2: Look what I made for you!
'---------------------------------------------------------------------------------------
' Module : modROT13
' Author : Joe[x86]
' Purpose : Conduct ROT13 encoding on messages.
'---------------------------------------------------------------------------------------
Private Const Ualphabet = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"
Private Const Lalphabet = "abcdefghijklmnopqrstuvwxzy"
'---------------------------------------------------------------------------------------
' Procedure : ROT13
' Author : Joe[x86]
' Purpose : Do the actual encoding.
'---------------------------------------------------------------------------------------
Public Function ROT13(s) As String
'On Error GoTo Hell
Dim Ret As String, i As Integer
For i = 1 To Len(s)
If InStr(1, Ualphabet, UCase(Mid(s, i, 1))) Then
If GetCase(Mid(s, i, 1)) Then
'Position = InStr(1, Ualphabet, Mid(s, i, 1))
Position = IIf(InStr(1, Lalphabet, Mid(s, i, 1)) + 13 > 26, InStr(1, Lalphabet, Mid(s, i, 1)) + 13 - 26, InStr(1, Lalphabet, Mid(s, i, 1)) + 13)
Ret = Ret & Mid(Ualphabet, Position, 1)
Else
'Position = InStr(1, Lalphabet, Mid(s, i, 1))
Position = IIf(InStr(1, Lalphabet, Mid(s, i, 1)) + 13 > 26, InStr(1, Lalphabet, Mid(s, i, 1)) + 13 - 26, InStr(1, Lalphabet, Mid(s, i, 1)) + 13)
Ret = Ret & Mid(Lalphabet, Position, 1)
End If
Else
Ret = Ret & Mid(s, i, 1)
End If
Next i
ROT13 = Ret
Exit Function
'Hell:
'Call MsgBox("Error " & Err.Number & " (" & Err.Description & ") in procedure ROT13 of Module modROT13")
End Function
'---------------------------------------------------------------------------------------
' Procedure : GetCase
' Author : Joe[x86]
' Purpose : Returns wether the letter is uppercase or not as a boolean.
'---------------------------------------------------------------------------------------
Public Function GetCase(s) As Boolean
On Error GoTo Hell
If LCase(s) = s Then
GetCase = False
Else
GetCase = True
End If
Exit Function
Hell:
Call MsgBox("Error " & Err.Number & " (" & Err.Description & ") in procedure GetCase of Module modROT13")
End Function
-
Go PHP!!
<?php
function decrot13($str)
{
$arr1 = array('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M',
'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z',
'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm',
'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z');
$arr2 = array('N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z',
'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M',
'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z',
'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm');
return str_replace($arr1, $arr2, $str);
}
function encrot13($str)
{
$arr1 = array('N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z',
'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M',
'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z',
'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm');
$arr2 = array('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M',
'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', 'X', 'Y', 'Z',
'a', 'b', 'c', 'd', 'e', 'f', 'g', 'h', 'i', 'j', 'k', 'l', 'm',
'n', 'o', 'p', 'q', 'r', 's', 't', 'u', 'v', 'w', 'x', 'y', 'z');
return str_replace($arr1, $arr2, $str);
}
?>
-
Jesus your languages suck!
C (normal)
int main ()
{
register char byte, cap;
for(;read (0, &byte, 1);)
{
cap = byte & 32;
byte &= ~cap;
byte = ((byte >= 'A') && (byte <= 'Z') ? ((byte - 'A' + 13) % 26 + 'A') :
byte) | cap;
write (1, &byte, 1);
}
}
C (fast):
char
table[]={0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,
27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53
,54,55,56,57,58,59,60,61,62,63,64,78,79,80,81,82,83,84,85,86,87,88,89,90,65,66,6
7,68,69,70,71,72,73,74,75,76,77,91,92,93,94,95,96,110,111,112,113,114,115,116,11
7,118,119,120,121,122,97,98,99,100,101,102,103,104,105,106,107,108,109,123,124,1
25,126,127,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,1
45,146,147,148,149,150,151,152,153,154,155,156,157,158,159,160,161,162,163,164,1
65,166,167,168,169,170,171,172,173,174,175,176,177,178,179,180,181,182,183,184,1
85,186,187,188,189,190,191,192,193,194,195,196,197,198,199,200,201,202,203,204,2
05,206,207,208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,224,2
25,226,227,228,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,2
45,246,247,248,249,250,251,252,253,254,255};
int main() {
register char c;
while(read(0,&c,1)){
write(1,&table[c],1);
}
}
C (evil):
main(a){while(a=~getchar())putchar(~a-1/(~(a|32)/13*2-11)*13);}
Perl (normal):
#!/usr/bin/perl -p
y/A-Za-z/N-ZA-Mn-za-m/;
Perl (fast):
#!/usr/bin/perl
foreach ('a'..'m', 'A'..'M') {
$q = chr(ord($_)+13);
$p{$_} = $q; $p{$q} = $_;
}
while (<>) { s#(.)#$p{$1}#g; print; }
Perl (evil):
#!/usr/bin/perl -p
BEGIN { @a = split //, "/-35753=?=357"x2; }
s.([a-zA-Z]).ord $1<97?uc($1^$a[ord($1)-65]):lc($1^$a[ord($1)-97]).ge;
Assembly (ugly):
.file "rot13.S"
.section .rodata
.align 4
table: /* static lookup table */
.byte
0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,
30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56
,57,58,59,60,61,62,63,64,78,79,80,81,82,83,84,85,86,87,88,89,90,65,66,67,68,69,7
0,71,72,73,74,75,76,77,91,92,93,94,95,96,110,111,112,113,114,115,116,117,118,119
,120,121,122,97,98,99,100,101,102,103,104,105,106,107,108,109,123,124,125,126,12
7,128,129,130,131,132,133,134,135,136,137,138,139,140,141,142,143,144,145,146,14
7,148,149,150,151,152,153,154,155,156,157,158,159,160,161,162,163,164,165,166,16
7,168,169,170,171,172,173,174,175,176,177,178,179,180,181,182,183,184,185,186,18
7,188,189,190,191,192,193,194,195,196,197,198,199,200,201,202,203,204,205,206,20
7,208,209,210,211,212,213,214,215,216,217,218,219,220,221,222,223,224,225,226,22
7,228,229,230,231,232,233,234,235,236,237,238,239,240,241,242,243,244,245,246,24
7,248,249,250,251,252,253,254,255
.text
.align 4
.globl rot13
.type rot13,@function
rot13:
movl 4(%esp), %eax
xorl %ebx, %ebx
L1: movb (%eax), %dl /* slurp not-so-loudly */
orb %dl, %dl
jz L2
movb %dl, %bl
movb table(%ebx), %dl
movb %dl, (%eax)
incl %eax
jmp L1
L2: xorb %dl, %dl
movb (%eax), %dl
ret
.Lfe1:
.size rot13,.Lfe1-rot13
Java (ugly):
public class rot13 {
public static void main (String args[]) throws Exception {
int abyte = 0;
while((abyte = System.in.read())>=0) {
int cap = abyte & 32;
abyte &= ~cap;
abyte = ((abyte >= 'A') && (abyte <= 'Z') ? ((abyte - 'A' + 13) % 26 + 'A'
) : abyte) | cap;
System.out.print(String.valueOf((char)abyte));
}
System.out.flush();
}
}
For every language you could imagine,
http://www.miranda.org/~jkominek/rot13/
-
No Visual BASIC, only REAL and Quick :P
-
I think the syntax would be the same, isn't it?
But VB isn't a real language anyway, it doesn't count :)
-
Q, REAL, and Visual are all based off of BASIC, but are different.
-
Qbasic was just an interpreter program for Basic. But I don't know about the others.
Also, I remember that VB and Basic are the same for doing things like this.
-
Pah. Q isn't just an interpreter, it has some of its own features.
-
What about good old TI-BASIC :).
-
It's not actually BASIC.
-
! I'm heart broken Wabbit.
-
It's z80.
-
z80 is what you code on your computer and send to your calculator. TI-BASIC is what you code on your calculator.
-
TI-BASIC is z80, not a BASIC derivant.
-
No Rabbit, read this page http://www.ticalc.org/programming/columns/ and you will see the z80 and TI-BASIC are different.
-
Either way, Joe's a biter.
-
z80 is ASM.
Example:
mov eax, 1
xor eax, eax
TI-BASIC is a BASIC knockoff
Example:
DispGraph()
Print 1+1
-
You're still a biter. Don't make your entire sig into ROTx because you found out how to en/decrypt it. You're a biter, plain and simple.
-
It's encode! :)
-
I think Xor'ing stuff counts as encryption because it needs a key :)
-
Rot is just character replacement isn't it? :\
-
Yes, you rotate each character
-
Yes, you rotate each character
*laugh*
I see. How does it need a key if it's a static rotation?
-
Congratulations iago, you just wasted several seconds of my time. I haven't told anybody, so they'll probably waste their time too.
-
Yes, you rotate each character
*laugh*
I see. How does it need a key if it's a static rotation?
I meant in general. In this case the key is 13, and everybody knows that, so it's useless.
-
Yes, you rotate each character
*laugh*
I see. How does it need a key if it's a static rotation?
I meant in general. In this case the key is 13, and everybody knows that, so it's useless.
Haha.
-
It's encode! :)
en·crypt Audio pronunciation of "encrypt" ( P ) Pronunciation Key (n-krpt)
tr.v. en·crypt·ed, en·crypt·ing, en·crypts
1. To put into code or cipher.
2. Computer Science. To alter (a file, for example) using a secret code so as to be unintelligible to unauthorized parties.
en·code Audio pronunciation of "encode" ( P ) Pronunciation Key (n-kd)
tr.v. en·cod·ed, en·cod·ing, en·codes
1. To put (a message, for example) into code.
2. Computer Science. To format (electronic data) according to a standard format.
3. Genetics. To specify the genetic code for (a protein molecule, for example).
They are entirely interchangeable.
-
That's not a pure computer science reference, which is on what terms we're speaking of encode/encrypt.
iago's right, they are NOT interchangeable. Look at these two definitions (provided by yourself):
Encrypt:
2. Computer Science. To alter (a file, for example) using a secret code so as to be unintelligible to unauthorized parties.
Encode:
2. Computer Science. To format (electronic data) according to a standard format.
Those are NOT interchangeable. The PURE purpose of encryption is mass distortion of text in order to HIDE the meaning of it from everyone but its meant recipient. Encoding is to put something into a standard format, such as Base64. Encoding is NOT made to hide its contents from readers.
-
That's not a pure computer science reference, which is on what terms we're speaking of encode/encrypt.
iago's right, they are NOT interchangeable. Look at these two definitions (provided by yourself):
Encrypt:
2. Computer Science. To alter (a file, for example) using a secret code so as to be unintelligible to unauthorized parties.
Encode:
2. Computer Science. To format (electronic data) according to a standard format.
Those are NOT interchangeable. The PURE purpose of encryption is mass distortion of text in order to HIDE the meaning of it from everyone but its meant recipient. Encoding is to put something into a standard format, such as Base64. Encoding is NOT made to hide its contents from readers.
That's correct. Rotation encoding has a secret code (in my signature, it's 13), and it perfect fits the definition for encrypt.
I think that the differences are settled enough that I can make fun of anybody who gets them mixed up.
All that's left now is to drive into people's heads the difference between DOS and a Command Prompt (cmd) :-)
-
Question: What's the difference between ROT13 and ROT1 for example?
And to decode ROT13 encoding, you set A=26, B=25, C=24.... and so on, right?
Edit:
To clary on the rot13 thing, and then change the number to the actual letter in the alphabet
So something would be
LOL in ROT13
12, 15, 12
LOL in plaintext
-
ROT26 > ROT13
-
ROT26 > ROT13
"All messages encoded in ROT26" haha
-
That's not a pure computer science reference, which is on what terms we're speaking of encode/encrypt.
iago's right, they are NOT interchangeable. Look at these two definitions (provided by yourself):
Encrypt:
2. Computer Science. To alter (a file, for example) using a secret code so as to be unintelligible to unauthorized parties.
Encode:
2. Computer Science. To format (electronic data) according to a standard format.
Those are NOT interchangeable. The PURE purpose of encryption is mass distortion of text in order to HIDE the meaning of it from everyone but its meant recipient. Encoding is to put something into a standard format, such as Base64. Encoding is NOT made to hide its contents from readers.
That's correct. Rotation encoding has a secret code (in my signature, it's 13), and it perfect fits the definition for encrypt.
I think that the differences are settled enough that I can make fun of anybody who gets them mixed up.
All that's left now is to drive into people's heads the difference between DOS and a Command Prompt (cmd) :-)
ROT13 is a standard format as well, because you are moving EVERY initial value by 13, and your signature is also electronic data.