Форум: "Потрепаться";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Вниз

Кодирование информации   Найти похожие ветки 

← →
Undert   (2001-12-01 14:30) [4]

А попроще и по муднее:
For I:=1 To SizeOf(PasswordBuffer) Do
PasswordBuffer[I]:=((Not (PasswordBuffer[I] Xor I+1) Xor I-1) Xor (PasswordBuffer[I]+1));

---

Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2002.01.28;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.003 c