hacker.org

Code: Select all

'==========================================================================
'
' NAME: Decrypter Hackers.org
'
' AUTHOR: Neo1985
' DATE  : 25/12/2009
'
' COMMENT: 
'
'==========================================================================

Dim Inputstring, y, z, OutputString

'Inputstring = "123x456"
Inputstring = "93752xxx746x27x1754xx90x93xxxxx238x44x75xx08750912738x8461x8759383xx328x4x4935903x6x5550360535004x0xx945958961296x267x8842xxx5x6xx61x4x48482x80xxx83316843x7x4x83x9521731xxx25x51xx457x6x5x9698222x771237745034x5133592x27xx8x87xx35221x36x0x50x23x7x63x998418xx"

x = 1
Do Until x = Len(Inputstring)+1

	y= Mid(Inputstring,x,1)
	WScript.Echo "Processing: " & y
	If y = "x" Then
		z = Mid(Inputstring,x-2,2)
		WScript.Echo "x found, replacing by: " & z
		OutputString = OutputString & z
		Inputstring = RebuildInputString(x,z)
	End If
	x = x +1
Loop 

WScript.Echo "Final String: " & Inputstring
WScript.Echo "Final Sum: " & GetTheSum(Inputstring)


Function RebuildInputString(x, z)
	Dim temp
	
	temp = Mid(Inputstring,1,x-1) & z
	temp = temp & Mid(Inputstring,x+1 , Len(Inputstring) - x)
	WScript.Echo "New inputstring: " & temp
	RebuildInputString = temp
End Function

Function GetTheSum(sumString)
Dim sum, x , y

For x = 1 To Len(sumString)
	y = Mid(sumString,x,1)
	y = CInt(y)
	sum = sum + y

Next

GetTheSum = sum

End function

Code: Select all

expr `sed -re : -e 's/([0-9][0-9])x/\1\1/g' -e t -e 's/[0-9]/& + /g' Valuationtxt` 0

Code: Select all

#!/usr/bin/perl
$_="93752xxx74...";
while (s/(..)x/$1$1/) {1};
for (split("")) {$x+=$_};
print $x;

Code: Select all

perl -le '$_="93752xxx74...";$x+=$2while s/(..)x|(.)/$1$1/;print$x'

Code: Select all

a = 0
pp = 0
p = 0
vs = '93752xxx746x27x1754xx90x93xxxxx238x44x75xx08750912738x8461x8759383xx328x4x4935903x6x5550360535004x0xx945958961296x267x8842xxx5x6xx61x4x48482x80xxx83316843x7x4x83x9521731xxx25x51xx457x6x5x9698222x771237745034x5133592x27xx8x87xx35221x36x0x50x23x7x63x998418xx'

for c in vs:
    if c == 'x':
        a = a + p + pp
    else:
        pp = p
        p = int(c)
        a = a + int(c)

print a

Code: Select all

spam = '93752xxx746x27x1754xx90x93xxxxx238x44x75xx08750912738x8461x8759383xx328x4x4935903x6x5550360535004x0xx945958961296x267x8842xxx5x6xx61x4x48482x80xxx83316843x7x4x83x9521731xxx25x51xx457x6x5x9698222x771237745034x5133592x27xx8x87xx35221x36x0x50x23x7x63x998418xx'
counter,count,minusone = 0,1,0

while count <= 256-minusone:
    if spam[count-1].isnumeric() == True:
        counter += int(spam[count-1])
        count += 1
    else:
        spam = spam.replace('x','',1)
        minusone += 1
        count -= 2

print(counter)

Code: Select all

		String src="93752xxx746x...............";
		char[] srcc=src.toCharArray();
		List chars = new List();
		for(int i=0;i<srcc.length;i++) chars.add(Character.toString(srcc[i]));
		int count=0;
		for (int i=0;i<chars.getItemCount();i++)
		{
			if (Character.isDigit(chars.getItem(i).toCharArray()[0]))
			{
				count+=Integer.parseInt(""+chars.getItem(i));
			} else
			{
				count+=Integer.parseInt(""+chars.getItem(i-1));
				count+=Integer.parseInt(""+chars.getItem(i-2));
				chars.remove(i);
				i--;
			};
		}
		System.out.println(count);
	}

Code: Select all

$orig = '93752xxx746......';
echo $orig;
$str=str_split($orig);
    $a=0;$b=0;
    foreach($str as $char)
     {
        if (is_numeric($char)) {$a=$b;$b=$char;};
        if ($char == 'x') {$orig=preg_replace('/x/',$a.$b,$orig,1);};
     }
  echo '<br/>'.$orig; 
  $str=str_split($orig); 
$sum=0;
	foreach($str as $char)
	   {  if (is_numeric($char)) $sum +=$char;
     }

Code: Select all

	char str[] = "93752xxx746x27x1754xx90x93xxxxx238x44x75xx08750912738x8461x8759383xx328x4x4935903x6x5550360535004x0xx945958961296x267x8842xxx5x6xx61x4x48482x80xxx83316843x7x4x83x9521731xxx25x51xx457x6x5x9698222x771237745034x5133592x27xx8x87xx35221x36x0x50x23x7x63x998418xx";
	int sum, j, k;
	
	for (int i=0; i<strlen(str); i++) {
		if(str[i] == 'x' && (j=i)) {
			k=0;
			while (k<2 && j--) {
				if(str[j]!='x') {
					sum += str[j] - '0';
					k++;					
				}
			}
		} 
		else sum+=str[i]- '0';
	}
	printf("%d", sum);

Code: Select all

#!/bin/bash

STRING="93752xxx746x27x1754xx90x93xxxxx238x44x75xx08750912738x8461x8759383xx328x4x4935903x6x5550360535004x0xx945958961296x267x8842xxx5x6xx61x4x48482x80xxx83316843x7x4x83x9521731xxx25x51xx457x6x5x9698222x771237745034x5133592x27xx8x87xx35221x36x0x50x23x7x63x998418xx"

SUM=0
MEM1=0
MEM2=0

while read -r -n 1 CHAR ; do

        if [ "$CHAR" == "x" ] ; then
                SUM=$((SUM+$MEM1+$MEM2))
        elif [ -z "$CHAR" ] ; then
                echo $SUM
                exit 0
        else
                SUM=$((SUM+$CHAR))
                MEM1=$MEM2
                MEM2=$CHAR
        fi

done <<< $STRING