01.04.2008, 19:28
|
|
Leaders of Antichat - Level 4
Регистрация: 16.01.2006
Сообщений: 1,966
С нами:
10692266
Репутация:
3486
|
|
Сообщение от ProTeuS
мб
PHP код:
public sl_strrev
;
;
sl_strrev proc far
push ds
push si
push di
push ax
push cx
pushf
cld
;
; Init ptr to the start of the string
;
mov si, es
mov ds, si
mov si, di
;
; Compute the length of the string:
;
mov cx, 0ffffh
mov al, 0
repne scasb
neg cx
dec cx
dec cx
shr cx, 1 ;Only have to do half the bytes.
jcxz StrRvsd
dec di ;Point at zero byte.
;
; Okay, swap the bytes in the string.
;
SwapBytes: dec di
lodsb
xchg al, [di] ;Note: es=ds.
mov (0-1)[si], al
loop SwapBytes
;
StrRvsd: popf
pop cx
pop ax
pop di
pop si
pop ds
ret
sl_strrev endp
Фи, мб?
PHP код:
#!usr/bin/perl
print scalar reverse $ARGV[0];
>> или в начале написать using namespace std
А ну конечно, поток вывода он без стандартного пространства имён понимает, а ввода не понимает, до?
Последний раз редактировалось .Slip; 01.04.2008 в 19:34..
|
|
|