Поиск:

Ответ в темуСоздание новой темы Создание опроса
> mini конкурс! сабж 
:(
    Опции темы
oleg1973
Дата 1.11.2004, 23:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
ну что на дворе 1 ноября
делаем мини конкурс!
"fire-demo 4096"
задача:
написать эффект огня
мах размер скажем 4096 байт
ось роли не играет дос/виндос
файл не паковать!
сорцы показывать! в архив положим и фак

срок 2 недели
победителя голосованием
работы шлите мне на мыло


p.s.
если присоеденятся не asm кодеры, всегда welcom!
тока пусть в размер уложатся


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 1.11.2004, 23:59 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
да вот забыл
кто желает учавствовать,имена оставляйте

p.s.
кто не понял задания
вот пример, 248 байт ;-)
уж в 4096 такое не засунуть,пазорище :D :D

Присоединённый файл ( Кол-во скачиваний: 77 )
Присоединённый файл  FIRE07.COM


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 3.11.2004, 19:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
как то неактивно товарищи!
чингачгук давай выдвигай свою кандитуру :D


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
Dr.Death
Дата 3.11.2004, 21:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 950
Регистрация: 15.7.2003
Где: Волгоград

Репутация: нет
Всего: 1
oleg1973
Даешь исходники ? :)

Это сообщение отредактировал(а) Dr.Death - 3.11.2004, 21:50


--------------------
Жизнь коротка, чтобы быть в ней слабым.© Арнольд Шварцнеггер
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 3.11.2004, 22:49 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
Dr.Death
эт не я делал
но могу сделать,так как знаю как


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
bel_nikita
Дата 7.11.2004, 00:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Эксперт
Сообщений: 2304
Регистрация: 12.10.2003
Где: Поезд №21/22 ( ст . Прага )

Репутация: нет
Всего: 47
oleg1973
Цитата
эт не я делал
но могу сделать,так как знаю как

Победитель ясен smile
Если, не влом. Сделай. Хотелось бы на исходники такой проги взглянуть.



--------------------
user posted image — регистрация доменов от 150 руб.
PM MAIL WWW ICQ   Вверх
S.A.P.
Дата 7.11.2004, 01:34 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Участник Клуба
Сообщений: 2664
Регистрация: 11.6.2004

Репутация: нет
Всего: 71
Цитата(bel_nikita @ 7.11.2004, 00:04)
Хотелось бы на исходники такой проги взглянуть.

А ты его дизассемблером smile . У СОМ файла будет один в один с исходником.
PM MAIL   Вверх
Атос
Дата 7.11.2004, 09:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 22
Регистрация: 11.9.2004
Где: Екатеринбург

Репутация: нет
Всего: нет
Может все таки усложним задачу? Сделать для виндозес? а то для ДОСа скока угодно
PM MAIL ICQ   Вверх
oleg1973
Дата 7.11.2004, 16:30 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
Атос
ну так как условие 4096 байт то можно и под вындос
разницы почти 0


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 7.11.2004, 23:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
Код

seg000:0100;
seg000:0100; ã=========================================================================¬
seg000:0100; ¦     This file is generated by The Interactive Disassembler (IDA)        ¦
seg000:0100; ¦     Copyright (c) 2002 by DataRescue sa/nv, <[email protected]>        ¦
seg000:0100; ¦          Licensed to: Oleg, DVDMods, 1 user, special           ¦
seg000:0100; L=========================================================================-
seg000:0100;
seg000:0100; ---------------------------------------------------------------------------
seg000:0100; File Name   : C:\FIRE07.COM
seg000:0100; Format      : MS-DOS COM-file
seg000:0100; Base Address: 1000h Range: 10100h-101F8h Loaded length: F8h
seg000:0100
seg000:0100
seg000:0100; ===========================================================================
seg000:0100
seg000:0100; Segment type: Pure code
seg000:0100 seg000          segment byte public 'CODE'
seg000:0100                 assume cs:seg000
seg000:0100                 org 100h
seg000:0100                 assume es:nothing, ss:nothing, ds:seg000
seg000:0100
seg000:0100                 public start
seg000:0100 start:
seg000:0100                 mov     ah, 0Fh
seg000:0102                 int     10h            ; - VIDEO - GET CURRENT VIDEO MODE
seg000:0102                                        ; Return: AH = number of columns on screen
seg000:0102                                        ; AL = current video mode
seg000:0102                                        ; BH = current active display page
seg000:0104                 push    ax
seg000:0105                 mov     ax, 13h
seg000:0108                 int     10h            ; - VIDEO - SET VIDEO MODE
seg000:0108                                        ; AL = mode
seg000:010A                 mov     dx, 3C4h
seg000:010D                 mov     ax, 604h
seg000:0110                 out     dx, ax         ; EGA: sequencer address reg
seg000:0110                                        ; unknown register
seg000:0111                 mov     ax, 0F02h
seg000:0114                 out     dx, ax         ; EGA: sequencer address reg
seg000:0114                                        ; unknown register
seg000:0115                 mov     dx, 3D4h
seg000:0118                 mov     ax, 14h
seg000:011B                 out     dx, ax         ; Video: CRT cntrlr addr
seg000:011B                                        ; underline location.  Bits 0-5 are scan line number.
seg000:011C                 mov     ax, 0E317h
seg000:011F                 out     dx, ax         ; Video: CRT cntrlr addr
seg000:011F                                        ;
seg000:0120                 mov     ax, 409h
seg000:0123                 out     dx, ax         ; Video: CRT cntrlr addr
seg000:0123                                        ;
seg000:0124                 mov     di, 1FAh
seg000:0127                 push    di
seg000:0128                 mov     cx, 0D8h
seg000:012B                 mov     al, 0
seg000:012D                 repe stosb
seg000:012F                 mov     cx, 228h
seg000:0132                 mov     al, 3Fh
seg000:0134                 repe stosb
seg000:0136                 pop     di
seg000:0137                 push    di
seg000:0138                 mov     bl, 0
seg000:013A
seg000:013A loc_1013A:                             ; CODE XREF: seg000:0153j
seg000:013A                 inc     di
seg000:013B                 inc     di
seg000:013C                 mov     al, bl
seg000:013E                 shl     al, 1
seg000:0140                 stosb
seg000:0141                 add     di, 15h
seg000:0144                 stosb
seg000:0145                 inc     di
seg000:0146                 sub     al, 10h
seg000:0148                 neg     al
seg000:014A                 stosb
seg000:014B                 sub     di, 18h
seg000:014E                 inc     bl
seg000:0150                 cmp     bl, 8
seg000:0153                 jl      loc_1013A
seg000:0155                 add     di, 18h
seg000:0158                 mov     bl, 0
seg000:015A                 mov     al, 2Fh
seg000:015C                 mul     bl
seg000:015E                 mov     cl, 18h
seg000:0160                 div     cl
seg000:0162                 add     al, 10h
seg000:0164                 stosb
seg000:0165                 add     di, 0A9h
seg000:0169                 mov     al, 15h
seg000:016B                 mul     bl
seg000:016B; ---------------------------------------------------------------------------
seg000:016D                 db 0C1h; +
seg000:016E                 db 0E8h; ø
seg000:016F                 db    3;  
seg000:0170                 db 0AAh; ê
seg000:0171                 db  81h; Á
seg000:0172                 db 0EFh; ÿ
seg000:0173                 db 0A8h; è
seg000:0174                 db    0;  
seg000:0175                 db 0FEh; ¦
seg000:0176                 db 0C3h; +
seg000:0177                 db  80h; À
seg000:0178                 db 0FBh; v
seg000:0179                 db  18h;  
seg000:017A                 db  7Ch; |
seg000:017B                 db 0DEh; ¦
seg000:017C                 db 0B3h; ¦
seg000:017D                 db    0;  
seg000:017E                 db 0B0h; -
seg000:017F                 db  1Fh;  
seg000:0180                 db 0F6h; ¡
seg000:0181                 db 0E3h; ó
seg000:0182                 db 0C1h; +
seg000:0183                 db 0E0h; ð
seg000:0184                 db    4;  
seg000:0185                 db 0B0h; -
seg000:0186                 db  3Fh; ?
seg000:0187                 db 0ABh; ë
seg000:0188                 db  47h; G
seg000:0189                 db 0FEh; ¦
seg000:018A                 db 0C3h; +
seg000:018B                 db  80h; À
seg000:018C                 db 0FBh; v
seg000:018D                 db  20h;  
seg000:018E                 db  7Ch; |
seg000:018F                 db 0EEh; þ
seg000:0190                 db 0B0h; -
seg000:0191                 db    0;  
seg000:0192                 db 0BAh; ¦
seg000:0193                 db 0C8h; L
seg000:0194                 db    3;  
seg000:0195                 db 0EEh; þ
seg000:0196                 db  5Eh; ^
seg000:0197                 db  42h; B
seg000:0198                 db 0B9h; ¦
seg000:0199                 db    0;  
seg000:019A                 db    3;  
seg000:019B                 db 0F3h; º
seg000:019C                 db  6Eh; n
seg000:019D                 db  68h; h
seg000:019E                 db    0;  
seg000:019F                 db 0A0h; à
seg000:01A0                 db    7;  
seg000:01A1                 db 0BFh; ¬
seg000:01A2                 db    0;  
seg000:01A3                 db    0;  
seg000:01A4                 db 0B0h; -
seg000:01A5                 db    0;  
seg000:01A6                 db 0B9h; ¦
seg000:01A7                 db  80h; À
seg000:01A8                 db  1Bh;  
seg000:01A9                 db 0F3h; º
seg000:01AA                 db 0AAh; ê
seg000:01AB                 db 0BFh; ¬
seg000:01AC                 db 0E0h; ð
seg000:01AD                 db  1Ah;  
seg000:01AE                 db 0B1h; -
seg000:01AF                 db  1Ah;  
seg000:01B0                 db 0E5h; õ
seg000:01B1                 db  40h; @
seg000:01B2                 db  25h; %
seg000:01B3                 db  3Fh; ?
seg000:01B4                 db  3Fh; ?
seg000:01B5                 db  26h; &
seg000:01B6                 db    1;  
seg000:01B7                 db    5;  
seg000:01B8                 db  83h; Ã
seg000:01B9                 db 0C7h; ¦
seg000:01BA                 db    3;  
seg000:01BB                 db 0E2h; ò
seg000:01BC                 db 0F3h; º
seg000:01BD                 db 0BFh; ¬
seg000:01BE                 db    0;  
seg000:01BF                 db    0;  
seg000:01C0                 db 0B9h; ¦
seg000:01C1                 db 0E0h; ð
seg000:01C2                 db  1Ah;  
seg000:01C3                 db  26h; &
seg000:01C4                 db  8Bh; Ë
seg000:01C5                 db  45h; E
seg000:01C6                 db  4Fh; O
seg000:01C7                 db    2;  
seg000:01C8                 db 0C4h; -
seg000:01C9                 db 0B4h; +
seg000:01CA                 db    0;  
seg000:01CB                 db 0D0h; ¦
seg000:01CC                 db 0D4h; L
seg000:01CD                 db  26h; &
seg000:01CE                 db    2;  
seg000:01CF                 db  45h; E
seg000:01D0                 db  51h; Q
seg000:01D1                 db  80h; À
seg000:01D2                 db 0D4h; L
seg000:01D3                 db    0;  
seg000:01D4                 db  26h; &
seg000:01D5                 db    2;  
seg000:01D6                 db  85h; Å
seg000:01D7                 db 0A0h; à
seg000:01D8                 db    0;  
seg000:01D9                 db  80h; À
seg000:01DA                 db 0D4h; L
seg000:01DB                 db    0;  
seg000:01DC                 db  2Dh; -
seg000:01DD                 db    4;  
seg000:01DE                 db    0;  
seg000:01DF                 db 0C1h; +
seg000:01E0                 db 0F8h; °
seg000:01E1                 db    2;  
seg000:01E2                 db  7Dh; }
seg000:01E3                 db    2;  
seg000:01E4                 db 0B0h; -
seg000:01E5                 db    0;  
seg000:01E6                 db 0AAh; ê
seg000:01E7                 db 0E2h; ò
seg000:01E8                 db 0DAh; -
seg000:01E9                 db 0B4h; +
seg000:01EA                 db    1;  
seg000:01EB                 db 0CDh; =
seg000:01EC                 db  16h;  
seg000:01ED                 db  74h; t
seg000:01EE                 db 0BCh; -
seg000:01EF                 db  58h; X
seg000:01F0                 db 0B4h; +
seg000:01F1                 db    0;  
seg000:01F2                 db 0CDh; =
seg000:01F3                 db  10h;  
seg000:01F4                 db 0B4h; +
seg000:01F5                 db  4Ch; L
seg000:01F6                 db 0CDh; =
seg000:01F7                 db  21h; !
seg000:01F7 seg000          ends
seg000:01F7
seg000:01F7
seg000:01F7                 end start




--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 10.11.2004, 01:09 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
ну смотрю активности 0%
перевелись кодеры smile

вот мой вариант
не 4096 а 5373
запросто в 1024 переделывается smile
но наступила лень smile

Присоединённый файл ( Кол-во скачиваний: 54 )
Присоединённый файл  FIRE13.COM


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
Chingachguk
Дата 10.11.2004, 17:54 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1232
Регистрация: 25.3.2002
Где: Москва

Репутация: 3
Всего: 18
119 байт. Правда, это я давным-давно написал ;)

Код

; Программа генерации пламени.
; Coded by Chingachguk.
; Size = 119 bytes
.286
text segment byte public
 assume cs:text,ds:text
org 100h
iter_number EQU 180
ADD_COLOR   EQU 39
begin:  MOV  AL,13H
INT  10H
CLD
MOV  CX,320*200
PUSH 0A000H
POP  ES
XOR  DI,DI
@PAINT:  MOV    AX,DI
 XOR    DX,DX
 MOV    SI,320
 DIV    SI
 MOV    BP,AX; BP=X
 MOV    SI,DX; SI=Y
 PUSH   CX
 MOV    CX,ITER_NUMBER  ; CX=123, SI=(X-160), BP=(Y-100)
@FIND:  LEA    BX,[BP+SI]
 CMP    BX,320*200
 JAE    @N_BOUND
 OR     DS:BUFFER[BX],CL
 JZ     @DONE
@N_BOUND: MOV    AX,BP
 SHR    AX,1
 ADD    BP,AX
 MOV    AX,SI
 SHR    AX,1
 ADD    SI,AX
 LOOP   @FIND
@DONE:  ADD    CL,ADD_COLOR           ;129
 MOV    BUFFER[DI],CL
 PUSH   DI
 XOR    DX,DX
 MOV    AX,DI
 MOV    SI,320
 DIV    SI
 MUL    SI
 MOV    DI,AX
 CMP    DI,320*60
 JB     @N_DISPLAY
 LEA    SI,BUFFER[DI-320*60]
 MOV    CX,320*60/2
 MOV    DI,320*140
 REP    MOVSW
@N_DISPLAY: POP    DI
 POP    CX
 MOV    AH,1
 INT    16H
 JNZ    @ASK
 INC    DI
 LOOP   @PAINT
@ASK: XOR  AH,AH
INT  16H
@EXIT: MOV  AX,0003H
INT  10H
       ret
BUFFER  DB 320*200 DUP(?)
text ends
end begin


Присоединённый файл ( Кол-во скачиваний: 30 )
Присоединённый файл  Flame.com


--------------------
I don't like the drugs (but the drugs like me). M.Manson.
PM MAIL ICQ   Вверх
Dr.Death
Дата 10.11.2004, 20:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник Клуба
Сообщений: 950
Регистрация: 15.7.2003
Где: Волгоград

Репутация: нет
Всего: 1
oleg1973
Это та как такое написал?


--------------------
Жизнь коротка, чтобы быть в ней слабым.© Арнольд Шварцнеггер
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 10.11.2004, 21:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
Chingachguk
так у тебя палитра не сгенерена smile
а системная она на вид sux полный

Dr.Death
ну там самого кода 300 байт
надписи это спрайт по маске выводится 5000 байт
ужав его 5000/8=625 в 1024 влезем

а сам огонь
ну там кароче 4096 пихелей
массив на 380 кб
все это там тусуется+ blur на экране smile


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
Midaw
Дата 12.11.2004, 06:55 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 26
Регистрация: 19.8.2004
Где: г. Барнаул

Репутация: нет
Всего: нет
Как же мало наших ассомовских smile
PM MAIL WWW ICQ   Вверх
Chingachguk
Дата 12.11.2004, 10:03 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1232
Регистрация: 25.3.2002
Где: Москва

Репутация: 3
Всего: 18
Цитата
Chingachguk
так у тебя палитра не сгенерена


А что такое палитра ? ;)


--------------------
I don't like the drugs (but the drugs like me). M.Manson.
PM MAIL ICQ   Вверх
oleg1973
Дата 12.11.2004, 10:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
Chingachguk
ну это когда в 0x3d8 номер (0-255) цвета
а в 0x3d9 потом 3 байта подряд RGB
получим 0xFF цветов из палитры 0xFFFFFF
ну канешно если ты не знал smile
Midaw
ну а что делать smile
мал золотник да дорог smile


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
Chingachguk
Дата 13.11.2004, 20:11 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Участник Клуба
Сообщений: 1232
Регистрация: 25.3.2002
Где: Москва

Репутация: 3
Всего: 18
oleg1973
Цитата
ну канешно если ты не знал


Реально не знал ;) Видел в демках, но не разбирался, зачем это. Спасибо.


--------------------
I don't like the drugs (but the drugs like me). M.Manson.
PM MAIL ICQ   Вверх
Tyler Durden
Дата 12.1.2005, 13:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 11
Регистрация: 12.1.2005
Где: Одесса

Репутация: 2
Всего: 2
Ой ;) А я уже писал что лет назад (еще на тасме) смотреть тут
PM MAIL WWW ICQ   Вверх
oleg1973
Дата 12.1.2005, 20:46 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


asm fanat
****


Профиль
Группа: Экс. модератор
Сообщений: 3283
Регистрация: 16.7.2003
Где: Italy

Репутация: 2
Всего: 34
Tyler Durden
позняк метатся smile
тыб еще спекртум вспомнил и enlight smile


--------------------
SST 465555
icq 200-512-712
PM MAIL WWW ICQ   Вверх
Страницы: (2) [Все] 1 2 
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Asm для Windows/DOS"
MAKCim
  • Проставьте несколько ключевых слов темы, чтобы её можно было легче найти.
  • Не забывайте пользоваться кнопкой КОД.
  • Телепатов на форуме нет! Задавайте чёткий, конкретный и полный вопрос. Указывайте полностью ошибки компилятора и компоновщика.
  • Новое сообщение должно иметь прямое отношение к разделу форума. Флуд, флейм, оффтопик запрещены.
  • Категорически запрещается обсуждение вареза, "кряков", взлома программ и т.д.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, MAKCim.
 
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Asm для Windows/Dos | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




[ Время генерации скрипта: 0.0612 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
 По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.