Sayfa: [1]   Aşağı git
  Yazdır  
Gönderen Konu: Delphi asembly ile internette fark edilmeden dolaşma  (Okunma Sayısı 224 defa)
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
sebo
Ziyaretçi
« : 24 Ocak 2008, 20:09:30 »

Asembly olmadan arkadaşlar asla iyi bir yazılımcı olmazsınız iyi dil zor olandır Gülümseme
Alıntı
[
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
Logged
Sayfa: [1]   Yukarı git
  Yazdır  
GoogleTagged

 
Gitmek istediğiniz yer: