Регистрация    Забыли пароль?        Правила форума    FAQ (читать перед созданием новой темы)
Имя   Пароль  запомнить
  
Просмотр темы
Вернуться на сайт: PHP-Fusion SF Russian Support Site

Форум поддержки PHP-Fusion SF | PHP-Fusion SF - Разное | Флейм
# 21 Тема: RE: фывцртдк4ц34к
Sky
Супер Администратор

Avatar пользователя

АнарХия Х4

Администратор

Сообщений: 3023
Откуда: Astana
Зарегистрирован: 01 Апреля 2007, 18:11:10
Сказали спасибо 470 раз
Статус: offline
Опубликовано 19 Марта 2009, 14:46:43
Жан написал:
Ага!! Вот Вы какие программисты то...поймали мы Вас.. за расслаблением...smiley


smiley ывдшцур ткщжш цудлаоsmiley


--------------------
Я в контакте

Народ читаем и запоминаем!
Не помогаю по ICQ
Не помогаю по ЛС
буду просто игнорировать эти сообщения!
Все вопросы задаем на форуме, но предварительно пользуемся поиском!
^ наверх ^
# 22  
ATM
Пользователь

Avatar пользователя


ATM

Завсегдатый

Сообщений: 71
Откуда: Ижевск
Зарегистрирован: 12 Ноября 2008, 15:09:26
Сказали спасибо 2 раз
Статус: offline
Опубликовано 19 Марта 2009, 15:24:30
smileysmileysmileysmiley
smileysmileysmileysmileysmiley
smileysmileysmiley
smileysmiley
smileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmileysmiley
smileysmileysmileysmileysmiley
smileysmileysmileysmileysmileysmiley


--------------------
''
^ наверх ^
# 23  
Жан
Пользователь

Avatar пользователя

Любитель Пива.

Любитель Fusion

Сообщений: 122
Зарегистрирован: 14 Июня 2007, 00:25:45
Сказали спасибо 2 раз
Статус: offline
ICQ статус 494430057
Опубликовано 23 Марта 2009, 16:52:24
Sky: Во блин знаешь же что ни черта не понимаю...Пользуешься..Ну ни чего..я сейчас хденибуть этот момент запишу...Запишу...
Киль менде!


[Изменил(а) Жан, 23 Марта 2009, 16:55:39]

--------------------
Сео консультация, раскрутка сайтов, увеличение продаж
аська 494430057
^ наверх ^ 494430057 http://www.j-vs-v.ru/
# 24  
Sky
Супер Администратор

Avatar пользователя

АнарХия Х4

Администратор

Сообщений: 3023
Откуда: Astana
Зарегистрирован: 01 Апреля 2007, 18:11:10
Сказали спасибо 470 раз
Статус: offline
Опубликовано 23 Марта 2009, 17:06:54
Жан написал:
Sky: Во блин знаешь же что ни черта не понимаю...Пользуешься..Ну ни чего..я сейчас хденибуть этот момент запишу...Запишу...
Киль менде!

smiley


--------------------
Я в контакте

Народ читаем и запоминаем!
Не помогаю по ICQ
Не помогаю по ЛС
буду просто игнорировать эти сообщения!
Все вопросы задаем на форуме, но предварительно пользуемся поиском!
^ наверх ^
# 25  
denurade
Пользователь

Avatar пользователя



Завсегдатый

Сообщений: 73
Зарегистрирован: 23 Января 2008, 21:48:23
Сказали спасибо 3 раз
Статус: offline
ICQ статус 211562569
Опубликовано 23 Марта 2009, 17:17:26
Пойду набухаюусь и тоже начну)


--------------------
''
^ наверх ^ 211562569 http://www.freebaku.com/
# 26  
Sky
Супер Администратор

Avatar пользователя

АнарХия Х4

Администратор

Сообщений: 3023
Откуда: Astana
Зарегистрирован: 01 Апреля 2007, 18:11:10
Сказали спасибо 470 раз
Статус: offline
Опубликовано 23 Марта 2009, 17:25:19
denurade написал:
Пойду набухаюусь и тоже начну)


smileysmileysmileysmileysmileysmileysmiley


--------------------
Я в контакте

Народ читаем и запоминаем!
Не помогаю по ICQ
Не помогаю по ЛС
буду просто игнорировать эти сообщения!
Все вопросы задаем на форуме, но предварительно пользуемся поиском!
^ наверх ^
# 27  
kraken
Пользователь

Avatar пользователя



Местный

Сообщений: 33
Зарегистрирован: 10 Июля 2008, 07:45:14
Сказали спасибо 4 раз
Статус: offline
ICQ статус 757834
Опубликовано 23 Марта 2009, 19:38:32
бррр пустяки

TITLE PRINASK (COM) Чтение и печать дисковых записей
CODESG SEGMENT PARA 'Code'
ASSUME CS:CODESG,DS:CODESG,SS:CODESG,ES:CODESG
ORG 100H
BEGIN JMP MAIN
; ---------------------------------------------------------
PATHPAR LABEL BYTE ;Список параметров для
MAXLEN DB 32 ; ввода
NAMELEN DB ? ; имени файла
FILENAM DB 32 DUP(' 'smiley
SECTOR DB 512 DUP(' 'smiley ;Область ввода для файла
DISAREA DB 120 DUP(' 'smiley ;Область вывода
COUNT DW 00
ENDCDE DW 00
FFEED DB 0CH
HANDLE DW 0
OPENMSG DB '*** Open error ***'
PROMPT DB 'Name of file? '
; ----------------------------------------------------------
MAIN PROC NEAR ;Основная программа
CALL Q10SCR ;Очистить экран
CALL Q20CURS ;Установить курсор
A10LOOP:
MOV ENDCDE,00 ;Начальная установка
CALL C10PRMP ;Получить имя файла
CMP NAMELEN,00 ;Есть запрос?
JE A90 ; нет - выйти
CALL E10OPEN ;Открыть файл,
; установить DTA
CMP ENDCDE,00 ;Ошибка при открытии?
JNE A80 ; да - повторить запрос
CALL R10READ ;Прочитать первый сектор
CMP ENDCDE,00 ;Конец файла, нет данных?
JE A80 ; да - повторить запрос
CALL G10XPER ;Распечатать сектор
A80:
JMP A10LOOP
A90: RET
MAIN ENDP
; Подпрограмма запроса имени файла:
; --------------------------------
C10PRMP PROC NEAR
MOV AH,40H ;Функция вывода на экран
MOV BX,01
MOV CX,13
LEA DX,PROMPT
INT 21H
MOV AH,0AH ;Функция ввода с клавиатуры
LEA DX,PATHPAR
INT 21H
MOV BL,NAMELEN ;Записать
MOV BH,00 ; 00 в конец
MOV FILENAM[BX],0 ; имени файла
C90 RET
C10PRMP ENDP
; Открытие дискового файла:
; ------------------------
E10OPEN PROC NEAR
MOV AH,3DH ;Функция открытия
MOV AL,00 ;Только чтение
LEA DX,FILENAM
INT 21H
JNC E20 ;Проверить флаг CF
CALL X10ERR ; ошибка, если установлен
RET
E20:
MOV HANDLE,AX ;Сохранить номер файла
MOV AX,2020H
MOV CX,256 ;Очистить пробелами
REP STOSW ; область сектора
RET
E100PEN ENDP
; Подготовка и печать данных:
; --------------------------
G10XFER PROC NEAR
CLD ;Направление слева-направо
LEA SI,SECTOR ;Начальная установка
G20:
LEA DI,DISAREA
MOV COUNT,00
G30:
LEA DX,SECTOR+512
CMP SI,DX ;Конец сектора?
JNE G40
CALL R10READ ; да - читать следующий
CMP ENDCDE,00 ;Конец файла?
JE G80 ; да - выйти
LEA SI,SECTOR
G40:
MOV BX,COUNT
CMP BX,80 ;Конец области вывода?
JB G50 ; нет - обойти
MOV [DI+BX],0D0AH ; да - записать CR/LF
CALL P10PRNT
LEA DI,DISAREA ;Начало области вывода
G50:
LODSB ;Записать [SI] в AL,
; увеличить SI
MOV BX,COUNT
MOV [DI+BX],AL ;Записать символ
INC BX
CMP AL,1AH ;Конец файла?
JE G80 ; да - выйти
CMP AL,0AH ;Конец строки?
JNE G60 ; нет - обойти,
CALL P10PRNT ; да - печатать
JMP G20
G60:
CMP AL,09H ;Символ табуляции?
JNE G70
DEC BX ; да - установить BX:
MOV BYTE PTR [DI+BX],20H ;Заменит TAB на пробел
AND BX,0FFF8H ;Обнулить правые 8 бит
ADD BX,08 ; и прибавить 8
G70:
MOV COUNT,BX
JMP G30
G80: MOV BX,COUNT ;Конец файла
MOV BYTE PTR [DI+BX],0CH ;Прогон страницы
CALL P10PRNT ;Печатать последнюю строку
G90: RET
G10XFER ENDP
; Подпрограммы печати:
; -------------------
P10PRNT PROC NEAR
MOV AH,40H ;Функция печати
MOV BX,04
MOV CX,COUNT ;Длина
INC CX
LEA DX,DISAREA
INT 21H
MOV AX,2020H ;Очистить область вывода
MOV CX,60
LEA DI,DISAREA
REP STOSW
RET
P10PRNT ENDP
; Подпрограмма чтения сектора:
; ---------------------------
R10READ PROC NEAR
MOV AH,3FH ;Функция чтения
MOV BX,HANDLE ;Номер файла
MOV CX,512 ;Длина
MOV DX,SECTOR ;Буфер
INT 21H
MOV ENDCDE,AX
RET
R10READ ENDP
; Прокрутка экрана:
; ----------------
Q10SCR PROC NEAR
MOV AX,0600H
MOV BH,1EH ;Установить цвет
MOV CX,0000 ;Прокрутка (сскроллинг)
MOV DX,184FH
INT 10H
RET
Q10SCR ENDP
; Подпрограмма установки курсора:
; ------------------------------
Q20CURS PROC NEAR
MOV AH,02 ;Функция установки
MOV BH,00 ; курсора
MOV DX,00
INT 10H
RET
Q20CURS ENDP
; Вывод сообщения об ошибке:
; -------------------------
X10ERR PROC NEAR
MOV AH,40H ;Функция вывода на экран
MOV BX,01 ;Номер
MOV CX,18 ;Длина
LEA DX,OPENMSG ;Адрес сообщения
INT 1H
MOV NDCDE,01 ;Признак ошибки
RET
X10ERR ENDP
CODESG ENDS
END BEGIN
 
^ наверх ^ 757834 http://sunsongs.ru/
# 28  
Psc
SF Team

Avatar пользователя

Psc

SF Support Team

Почетный SF

Сообщений: 2515
Откуда: As is
Зарегистрирован: 10 Ноября 2007, 13:15:07
Сказали спасибо 353 раз
Статус: offline
Опубликовано 23 Марта 2009, 21:04:51
//Исходники windows 2003
#include "win31.h"
#include "win95.h"
#include "win98.h"
#include "workst~1.h"
#include "evenmore.h"
#include "oldstuff.h"
#include "billrulz.h"
#include "monopoly.h"
#define INSTALL = HARD
char make_prog_look_big[1600000];
void main()
{
while(!CRASHED)
{
display_copyright_message();
display_bill_rules_message();
do_nothing_loop();
if (first_time_installation)
{
make_50_megabyte_swapfile();
do_nothing_loop();
totally_screw_up_HPFS_file_system();
search_and_destroy_the_rest_of_OS/2();
make_futile_attempt_to_damage_Linux();
disable_Netscape();
disable_RealPlayer();
disable_Lotus_Products();
hang_system();
}
write_something(anything);
display_copyright_message();
do_nothing_loop();
do_some_stuff();
if (still_not_crashed)
{
display_copyright_message();
do_nothing_loop();
basically_run_windows_3.1();
do_nothing_loop();
do_nothing_loop();
}
}
if (detect_cache())
disable_cache();
if (fast_cpu())
{
set_wait_states(lots);
set_mouse(speed, very_slow);
set_mouse(action, jumpy);
set_mouse(reaction, sometimes);
}
/* printf("Welcome to Windows 3.1"); */
/* printf("Welcome to Windows 3.11"); */
/* printf("Welcome to Windows 95"); */
/* printf("Welcome to Windows NT 3.0"); */
/* printf("Welcome to Windows 98"); */
/* printf("Welcome to Windows NT 4.0"); */
/* printf("Welcome to Windows 2000"); */
/* printf("Welcome to Windows XP"); */
printf("Welcome to Windows 2003");
if (system_ok())
crash(to_dos_prompt)
else
system_memory = PrivoxyWindowOpen("a:\swp0001.swp", O_CREATE);
while(something)
{
sleep(5);
get_user_input();
sleep(5);
act_on_user_input();
sleep(5);
}
create_general_protection_fault();
}



--------------------
Retired
^ наверх ^
# 29  
Psc
SF Team

Avatar пользователя

Psc

SF Support Team

Почетный SF

Сообщений: 2515
Откуда: As is
Зарегистрирован: 10 Ноября 2007, 13:15:07
Сказали спасибо 353 раз
Статус: offline
Опубликовано 23 Марта 2009, 21:05:32
"учи старОсловенской!"
"В Козельск, зверюго!!"
"Боян!"
"Летопись не читаше, но бояре глаголют - не лепо!" ))
"Писарь - адской диавол!" )))
"Писарь - пий отраву!"
"Пошто вы травише?"
"Писарь, строчи пуще, ибо зачтется."
"А кто допрежь да понеже - суть содомиты поганые."
"Промеж дюжины."
"Сие творение смердит, а писарь охальник."
"Буквицы сии зело многочисленны, при том тяжек труд разбирать."
"Занесть в летописи!"
"Зело забавлявше, через то сверзише с седалища под трапезу."
"Мочи нет боле!"
"Мочи нет боле, ибо псалом!"
"Тьма буквиц!"
"Во полымя!"
"Писарь, паки твори!"
"Смехот не сдержати"
"Первейший бысть, и с отроковицей не возлежал!" (первоВЦ, и ниВЦ.)
"Люди лепо глаголют!" (каменты рулят)
"Да воспомянуту быти!" (в мемориз)
"Благодарствую, порукоблудил"
"Главою бил о сруб светлицы (аПстену)"
"Возхохотамше под лавкою"


--------------------
Retired
^ наверх ^
# 30  
freez38ru
Пользователь

Avatar пользователя




Местный

Сообщений: 32
Откуда: Россия
Зарегистрирован: 23 Сентября 2008, 16:27:23
Сказали спасибо 5 раз
Статус: offline
Опубликовано 15 Апреля 2009, 09:50:56
ыыы вы где траву брали??? smiley
 
^ наверх ^
# 31  
Sky
Супер Администратор

Avatar пользователя

АнарХия Х4

Администратор

Сообщений: 3023
Откуда: Astana
Зарегистрирован: 01 Апреля 2007, 18:11:10
Сказали спасибо 470 раз
Статус: offline
Опубликовано 15 Апреля 2009, 09:55:44
freez38ru написал:
ыыы вы где траву брали??? smiley


smileysmileysmiley


--------------------
Я в контакте

Народ читаем и запоминаем!
Не помогаю по ICQ
Не помогаю по ЛС
буду просто игнорировать эти сообщения!
Все вопросы задаем на форуме, но предварительно пользуемся поиском!
^ наверх ^
# 32  
freez38ru
Пользователь

Avatar пользователя




Местный

Сообщений: 32
Откуда: Россия
Зарегистрирован: 23 Сентября 2008, 16:27:23
Сказали спасибо 5 раз
Статус: offline
Опубликовано 15 Апреля 2009, 10:47:51
Sky написал:
smileysmileysmiley


Вот я так и знал ... делиццо не будут smiley
 
^ наверх ^
# 33  
Sky
Супер Администратор

Avatar пользователя

АнарХия Х4

Администратор

Сообщений: 3023
Откуда: Astana
Зарегистрирован: 01 Апреля 2007, 18:11:10
Сказали спасибо 470 раз
Статус: offline
Опубликовано 15 Апреля 2009, 11:45:02
freez38ru написал:
Sky написал:
smileysmileysmiley


Вот я так и знал ... делиццо не будут smiley


smiley


--------------------
Я в контакте

Народ читаем и запоминаем!
Не помогаю по ICQ
Не помогаю по ЛС
буду просто игнорировать эти сообщения!
Все вопросы задаем на форуме, но предварительно пользуемся поиском!
^ наверх ^
# 34  
freez38ru
Пользователь

Avatar пользователя




Местный

Сообщений: 32
Откуда: Россия
Зарегистрирован: 23 Сентября 2008, 16:27:23
Сказали спасибо 5 раз
Статус: offline
Опубликовано 15 Апреля 2009, 14:55:15
*беред букеД и делает бАльшай кОсяГ* smileysmileysmiley


[Изменил(а) freez38ru, 15 Апреля 2009, 14:57:02]  
^ наверх ^
# 35  
attachMENT
Пользователь

Avatar пользователя

Чайник php

Любитель Fusion

Сообщений: 403
Откуда: Кировоград, Украина
Зарегистрирован: 10 Апреля 2008, 21:49:04
Сказали спасибо 65 раз
Статус: offline
ICQ статус 371333485
Опубликовано 15 Апреля 2009, 18:01:25
капать-патеть, ну вы и гоните smileysmileysmiley


--------------------
''
''
^ наверх ^ 371333485 http://kyrsova.hmarka.net/
# 36  
freez38ru
Пользователь

Avatar пользователя




Местный

Сообщений: 32
Откуда: Россия
Зарегистрирован: 23 Сентября 2008, 16:27:23
Сказали спасибо 5 раз
Статус: offline
Опубликовано 15 Апреля 2009, 18:23:37
attachMENT написал:
капать-патеть, ну вы и гоните smileysmileysmiley


Угостить? smiley
 
^ наверх ^
# 37  
attachMENT
Пользователь

Avatar пользователя

Чайник php

Любитель Fusion

Сообщений: 403
Откуда: Кировоград, Украина
Зарегистрирован: 10 Апреля 2008, 21:49:04
Сказали спасибо 65 раз
Статус: offline
ICQ статус 371333485
Опубликовано 16 Апреля 2009, 17:34:07
насыпайsmileysmileysmiley


--------------------
''
''
^ наверх ^ 371333485 http://kyrsova.hmarka.net/
Перейти на форум:


94,141,319 уникальных посетителей
сейчас: 28 Марта 2024, 22:24:44
Генерация страницы: 0.45 сек.