Delphi asembly ile internette fark edilmeden dolaşma

procedure BRICK0001; assembler;

asm

db 16, 16, 16, 16, 16, 16,111,111, 16,111, 16,111,109,106,111

db 16,110,110,107,111, 16,111,111,105,111, 16,110,108,105,110

db 16,108,105, 16,108, 16,105,109,111,106, 16,107,111,109, 16

db 16,110,111,109, 16, 16,109,110,110, 16, 16,109,109,108, 16

db 16,107,110,107, 16, 16,106,106,107,105, 16, 16, 16, 16, 16

db 107,111,110,105,111,109,110,110, 16,111,111,110,109, 16,111

db 110,111,109, 16,110,107,110,108, 16,108,107,109,105,105,110

db 16,105,111,110,105,107, 16,111,109, 16,109,107,110,110, 16

db 111,107,110,109,110,110,107,109,109,108,106,106,110,107,106

db 16, 16,106,106, 16, 16, 16, 16, 16, 16,109,111,111, 16,111

db 111,110,110,111,111,111,111,110,111,110,111,110,109,111,111

db 110,109,107,106,110,107,107,106, 16,109, 16,105,111,108,105

db 109,105,110,110, 16,111, 16,111,108,108,111, 16,110,108,111

db 111, 16,111,107,111,110, 16,108,106,108,106, 16,106, 16,106

db 16, 16, 16, 16, 16,111,110,106,111,110,110,110,109,111,111

db 111,110,109,110,110,110,111,107,110,111,110,110,107,111,110

db 108,105,106,106,109,105,105,110, 16,106,108,109,110,108,108

db 110,110,110,107,111,111,110,110,107,111,110,111,110,106,111

db 109,106,108, 16,109,106, 16,106,105,106

end;



procedure BLOCK000; assembler;

asm

db 0, 16, 16, 16, 16, 16, 31, 31,110,110, 16, 31, 31,110,108

db 16,110,110,110,110, 16,110,110,110,108, 16, 31,110,110,110

db 16,110,108,108,108, 16,108,110,110,108, 16,108,108,110,108

db 16,110,110,108,108, 16,108,110,108,107, 16,108,108,110,108

db 16,106,106,106,106, 0, 16, 16, 16, 16, 16, 16, 16, 16, 16

db 16, 31, 31,110,106, 31,110,110,110,110, 31,110,110,110,108

db 31, 31,110,110,110, 31,110,110,110,108, 31, 31,110,108,108

db 110,110,108,110,108,110,110,108,110,108,110,108,110,108,107

db 110,110,110,108,107,106,108,108,108,106, 16,106,106,106,106

db 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 31, 31,110,110, 16

db 31,110,110,110,106, 31,110,110, 31,106,110,110, 31,110,106

db 31,110,110,108,106,110,108,110,110,106,110,110,110,108,106

db 110,110,108,108,106,108,108,108,108,106,110,108,108,108,106

db 108,107,107,107,106,106,106,106,106, 16, 16, 16, 16, 16, 16

db 16, 16, 16, 16, 0, 31, 31, 31,110, 16, 31,110,110,110, 16

db 110,110,110,110, 16,110,110, 31,110, 16,110,110,110,108, 16

db 110,110,110,108, 16,110,110,108,108, 16, 31,108,108,110, 16

db 110,108,110,108, 16,108,108,108,108, 16,108,108,108,107, 16

db 106,106,106,106, 16, 16, 16, 16, 16, 0

end;





procedure BLOCK001; assembler;

asm

db 0, 16, 16, 16, 16, 16, 55, 55, 53, 55, 16, 53, 53, 51, 53

db 16, 53, 53, 51, 53, 16, 53, 53, 51, 53, 16, 53, 53, 51, 53

db 16, 51, 51, 50, 51, 16, 55, 31, 55, 55, 16, 53, 55, 53, 53

db 16, 53, 55, 53, 53, 16, 53, 55, 53, 53, 16, 53, 55, 53, 53

db 16, 51, 53, 51, 51, 0, 16, 16, 16, 16, 16, 16, 16, 16, 16

db 31, 55, 55, 31, 55, 55, 53, 53, 55, 53, 55, 53, 53, 55, 53

db 55, 53, 53, 55, 53, 55, 53, 53, 55, 53, 53, 51, 51, 53, 51

db 31, 55, 55, 55, 55, 55, 53, 53, 53, 53, 55, 53, 53, 53, 53

db 55, 53, 53, 53, 53, 55, 53, 53, 53, 53, 53, 51, 51, 51, 51

db 16, 16, 16, 16, 16, 16, 16, 16, 16, 16, 55, 55, 55, 55, 53

db 53, 53, 53, 53, 51, 53, 53, 53, 53, 51, 53, 53, 53, 53, 51

db 53, 53, 53, 53, 51, 51, 51, 51, 51, 50, 55, 55, 55, 55, 53

db 53, 53, 53, 53, 51, 53, 53, 53, 53, 51, 53, 53, 53, 53, 51

db 53, 53, 53, 53, 51, 51, 51, 51, 51, 50, 16, 16, 16, 16, 16

db 16, 16, 16, 16, 0, 55, 55, 55, 55, 16, 53, 53, 53, 53, 16

db 53, 53, 53, 53, 16, 53, 53, 53, 53, 16, 53, 53, 53, 53, 16

db 51, 51, 51, 51, 16, 55, 53, 55, 55, 16, 53, 51, 53, 53, 16

db 53, 51, 53, 53, 16, 53, 51, 53, 53, 16, 53, 51, 53, 53, 16

db 51, 50, 51, 51, 16, 16, 16, 16, 16, 0

end;





procedure BROWN001; assembler;

asm

db 16, 16, 16, 16, 16, 44, 45, 45, 45, 44, 43, 43, 44, 43, 45

db 42, 42, 43, 43, 42, 42, 42, 42, 42, 42, 42, 42, 41, 42, 42

db 42, 42, 42, 41, 42, 41, 41, 42, 42, 42, 42, 81, 43, 81, 40

db 81, 82, 82, 83, 41, 83, 81, 83, 83, 81, 83, 83, 84, 83, 83

db 84, 84, 84, 84, 84, 84, 84, 84, 85, 84, 16, 16, 16, 16, 16

db 43, 45, 43, 44, 43, 45, 42, 45, 44, 45, 43, 44, 43, 42, 44

db 42, 42, 43, 43, 43, 43, 41, 42, 42, 42, 41, 41, 41, 42, 40

db 41, 81, 40, 41, 81, 81, 41, 81, 43, 42, 41, 81, 83, 81, 43

db 81, 83, 83, 83, 41, 83, 83, 84, 83, 83, 84, 84, 84, 84, 83

db 84, 84, 84, 85, 84, 16, 16, 16, 16, 16, 44, 45, 43, 45, 44

db 44, 44, 44, 42, 43, 44, 42, 42, 43, 43, 42, 42, 42, 42, 42

db 42, 43, 42, 42, 42, 81, 42, 42, 42, 41, 40, 42, 41, 81, 41

db 42, 43, 40, 81, 40, 42, 40, 81, 40, 41, 41, 81, 83, 81, 81

db 81, 84, 84, 84, 81, 83, 84, 84, 84, 83, 84, 84, 84, 85, 84

db 16, 16, 16, 16, 16, 44, 44, 44, 43, 45, 44, 42, 44, 44, 43

db 43, 43, 42, 43, 42, 43, 42, 42, 42, 43, 42, 42, 43, 42, 41

db 41, 41, 42, 43, 42, 42, 40, 42, 43, 42, 43, 41, 41, 41, 43

db 43, 81, 81, 81, 81, 81, 83, 83, 83, 83, 83, 83, 84, 84, 83

db 83, 84, 84, 84, 84, 84, 84, 84, 84, 84

end;





procedure CHAMP000; assembler;

asm

db 0, 0,251,251, 0, 0,251, 6, 6, 0, 0, 6, 6, 6,251

db 0, 31, 6, 6, 31, 0, 6, 6, 31, 6,251, 6, 6, 31, 6

db 251, 31, 6, 31, 6,251, 6, 6, 6, 6,251,251,251,251, 6

db 0,251, 16, 16,251, 0, 29, 16, 16,251, 0, 29, 31, 31,251

db 0,251, 30, 30, 0, 0, 0,251,251, 0, 0, 0,251, 0, 0

db 0,251, 6,251, 0, 0, 6, 6, 6, 0, 0, 31, 6, 6,251

db 251, 6, 6, 6, 6, 6, 6, 31, 31, 6, 6, 6, 6, 6, 31

db 6, 6, 6, 6, 6, 6,251,251,251, 6,251, 29, 30, 30, 6

db 0, 30, 31, 31,251, 0, 30, 31, 31, 0, 0, 29, 30, 30, 0

db 0,251,251,251, 0, 0, 0,251, 0, 0, 0,251, 6,251, 0

db 0, 31, 6, 6, 0,251, 31, 6, 6, 0, 6, 6, 31, 6,251

db 6, 6, 31, 6, 31, 31, 6, 31, 6, 31, 31, 6, 6, 6, 31

db 6,251,251,251, 6, 6, 30, 30, 29,251,251, 31, 31, 30, 0

db 0, 31, 31, 30, 0, 0, 30, 30, 29, 0, 0,251,251,251, 0

db 0,251,251, 0, 0, 0, 6, 6,251, 0,251, 31, 6, 31, 0

db 6, 6, 6, 6, 0, 6, 6, 31, 6, 0, 31, 6, 31, 6,251

db 31, 6, 31, 6,251, 31, 6, 6, 6,251, 6,251,251,251,251

db 251, 16, 16,251, 0,251,251, 16, 29, 0,251, 31, 31, 29, 0

db 0, 30, 30,251, 0, 0,251,251, 0, 0

end;



procedure COIN000; assembler;

asm

db 0, 0, 0, 0, 0, 0, 0,159, 0, 0, 0, 0, 12,159, 0

db 0, 0, 12, 13, 0, 0,159, 12, 13, 0, 0,159, 13, 13, 0

db 0, 12,159, 13,159, 0, 12, 87, 14,159, 0, 12, 87, 13,159

db 0,159, 87, 14, 0, 0,159, 13, 14, 0, 0, 0, 14, 14, 0

db 0, 0, 14,159, 0, 0, 0,159, 0, 0, 0, 0, 0, 0, 0

db 0, 0,159, 0, 0, 0, 0, 12,159, 0, 0,159, 12, 13, 0

db 0, 12, 87, 13, 0, 0, 12, 13, 13, 0, 0, 12, 13, 14, 0

db 0, 12, 13, 13, 0, 0, 13, 13, 14, 0, 0, 12, 13, 14, 0

db 0, 13,159, 14, 0, 0,159, 14, 14, 0, 0, 0, 14,159, 0

db 0, 0,159, 0, 0, 0, 0, 0, 0, 0, 0, 0,159, 0, 0

db 0,159, 12, 0, 0, 0, 12, 12,159, 0, 0, 12, 87, 13, 0

db 0, 12, 12, 14, 0, 0, 12, 12, 13, 0, 0, 13, 12, 14, 0

db 0, 12, 12, 14, 0, 0, 13, 12, 14, 0, 0, 13,159, 14, 0

db 0, 14, 14,159, 0, 0,159, 14, 0, 0, 0, 0,159, 0, 0

db 0, 0, 0, 0, 0, 0, 0,159, 0, 0, 0,159, 13, 0, 0

db 0, 12, 12, 0, 0, 0, 12,159,159, 0, 0, 12,159,159, 0

db 159, 12,159, 14, 0,159, 12,159, 14, 0,159, 13,159, 14, 0

db 0, 13,159,159, 0, 0, 13, 14,159, 0, 0, 13, 14, 0, 0

db 0,159, 14, 0, 0, 0, 0,159, 0, 0

end;