Delphi / Kod bankası ( Delphi asembly ile internette fark edilmeden dolaşma )
Kod bankası ( Delphi asembly ile internette fark edilmeden dolaşma )
|
 |
Yazar: by_Coder
Eklenme:
03/02/08
Okunma:
48 |
|
|
| |
| |
|
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;
Derlamayi harhangi bir projeye yerleştirebilirisniz
kadir göksu 0 537 714 57 25
0 537 714 57 25
|
| |
|