---

function prn(a:byte);
begin
asm
mov @result,0
mov dx,Baseaddr
inc dx
inc dx {регистр управления}
mov al,13 {такое число надо послать – начало ст... продолжение на форуме]]> Delphi Ctrl+V http://orencode.info/forum/showthread.php?t=3471 http://orencode.info/forum/showthread.php?t=3470&goto=newpost Mon, 06 Sep 2010 17:12:30 GMT Хочу провести эксперимент. Поднять за месяц 10.000 рублей и именно в Интернете. Поднимать буду без вложений, т.е. с нуля. Для большей мотивации... Хочу провести эксперимент. Поднять за месяц 10.000 рублей и именно в Интернете. Поднимать буду без вложений, т.е. с нуля. Для большей мотивации создал эту тему. В ней я буду отписывать, где и сколько я заработал. После, в конце месяца, подвиду итог. :)

P.s. Если у кого есть предложения по заработку (на месяц) пишите в этой теме. :)