Qbasicnews.com
Decrypt this: - Printable Version

+- Qbasicnews.com (http://qbasicnews.com/newforum)
+-- Forum: QbasicNews.Com (http://qbasicnews.com/newforum/forum-3.html)
+--- Forum: Challenges (http://qbasicnews.com/newforum/forum-10.html)
+--- Thread: Decrypt this: (/thread-3151.html)

Pages: 1 2

Decrypt this: - na_th_an - 02-09-2004

I'm gonna add myself to the current motif. Decrypt this short text:

Code:
72<3>7=>3<47>55<8>3<6<8

It is fairly easy Tongue so the best algo wins (shorter & faster).

Decrypt this: - whitetiger0990 - 02-09-2004

is it a sentence? :x Gah! Im horrible at these

Decrypt this: - na_th_an - 02-09-2004

It is a sentence Big Grin

Decrypt this: - whitetiger0990 - 02-09-2004

is this the answer?
Code:
72<3>7=>3<47>55<8>3<6<8

if not i dont know >_>

Decrypt this: - na_th_an - 02-10-2004

I am asking you to decrypt my file.

C'mon, is it that hard?

I think it is fairly easy.

::roll:: - Meg - 02-10-2004

<edit>

Decrypt this: - KiZ - 02-10-2004

aha i know the algo. will post after my exam.... exam? **AAHHHH**
my exam in 15 mins....

Re: ::roll:: - na_th_an - 02-10-2004

Quote:
Quote:72<3>7=>3<47>55<8>3<6<8

Code:
CLS
PRINT "HELLO WORLD"
END

Big Grin

*peace*

Meg.

Hey, that was not fair. You gave a serious hint and didn't give the algo to decrypt the text. Basicly, you ruined the challenge Sad

Decrypt this: - Rokkuman - 02-10-2004

Awwwww... Meeeeeeeeeeeeg!

Ah well, I was gonna give it a shot, and fail. But Nate, tell us, how the heck do we decrypt that anyway?

Decrypt this: - KiZ - 02-10-2004

YEEHAW!
this is soooo messy, but hey...

Code:
'AHA!
CLS
s$ = "72<3>7=>3<47>55<8>3<6<8 "
FOR I = 1 TO LEN(s$)
a$ = MID$(s$, I, 1)
IF VAL(a$) <> 0 THEN
   num$ = num$ + a$
ELSE
   IF orig = 0 THEN orig = VAL(num$)
   oldd$ = old$
   old$ = a$
   oldnum = num
   num = VAL(num$)
   num$ = ""
   SELECT CASE oldd$
     CASE ">"
       new = new + num
     CASE "<"
       new = new - num
   END SELECT
       PRINT CHR$(new + orig);
END IF
NEXT