16b compo contest

Демки, интры

Postby g0blinish » Sat, 21.09.2013 09:25:11

Предагаю наморщить мозг и сбацать tinyintro размером с 16 байт.
Приза не будет пока что.

Мой вклад.

Code: Select all
   device zxspectrum128
        ORG #6000
begin

 ld bc,#5B40
lp0:
 ld h,c
lp1: inc (hl)
 out (#FE),a
 inc l:jr nz,lp1
 inc h
; ld a,h
; add a,2
; ld h,a
 ;res 2,h
 ld a,h:cp b:jr nz,lp1
 jr lp0
end
   display /d,end-begin
   savesna "!void.sna",begin


The extension asm is not allowed.

Image
Attachments
!void.sna
(128.03 KiB) Downloaded 569 times
[x] No Screenshot
User avatar
g0blinish
Упырь говнофорума
 
Posts: 3641
Joined: Tue, 18.06.2013 10:59:01

Postby VBI » Sat, 21.09.2013 10:12:45

поддерживаю:
Code: Select all
loop   ld a,r
   ld hl,#4800
lp1   ld (hl),a
   rra
   inc hl
   bit 4,h   
   jr z,lp1
   rla
   halt
   jr loop

ЗЫ: гигаскрин (для многоуважаемого Мороза), и сечение луча (специально для ЛВД) - фичи данного программного продукта
Attachments
16.sna
16 байт пользы, 128к хни
(128.03 KiB) Downloaded 590 times
User avatar
VBI
 
Posts: 1965
Joined: Mon, 03.06.2013 09:20:29

Postby g0blinish » Sat, 21.09.2013 10:26:56

VBI, красиво, но код имхо лишний:

ld a,r - wtf?
halt - без него крутится вроде.

и далее, если зациклена отрисовка на вторую треть, то пуркуа бы не:
inc l:jr nz,lp1
?
[x] No Screenshot
User avatar
g0blinish
Упырь говнофорума
 
Posts: 3641
Joined: Tue, 18.06.2013 10:59:01

Postby VBI » Sat, 21.09.2013 10:28:50

g0blinish wrote:inc l:jr nz,lp1

неа, будет только 256 байт, а не 2048
ld a,r можно заменить на любой ld a,* для ЭФФЕКТА %) стартовая графика, так сказать :)
эффект в прерывание, хуле!
User avatar
VBI
 
Posts: 1965
Joined: Mon, 03.06.2013 09:20:29

Postby VBI » Sat, 21.09.2013 10:31:16

g0blinish, у тебя эффект - вынос мозга %)

кстать, рекомендую сейчас волну
User avatar
VBI
 
Posts: 1965
Joined: Mon, 03.06.2013 09:20:29

Postby g0blinish » Sat, 21.09.2013 10:42:49

VBI wrote:g0blinish, у тебя эффект - вынос мозга

вот - вынос:
Code: Select all
   device zxspectrum128
        ORG #5bFE
begin
lp1:
 ld bc,#5bFE
 ld h,b;#58
lp: rl(hl);ld (hl),l
 inc hl
 res 2,h
 out (c),l
 jr lp
end
   display /d,end-begin
   savesna "!void.sna",begin



и ищо
Code: Select all
   device zxspectrum128
        ORG #5bFE
begin
lp1:
 ld bc,#5bFE
 ld h,b;#58
lp: ld (hl),l
 inc hl
 res 2,h
 out (c),l
 jr lp
end
   display /d,end-begin
   savesna "!void.sna",begin



и инструкция ld bc,#5bFE идет лесом, понятно же.
Attachments
-!void.sna
(128.03 KiB) Downloaded 559 times
!void.sna
(128.03 KiB) Downloaded 563 times
[x] No Screenshot
User avatar
g0blinish
Упырь говнофорума
 
Posts: 3641
Joined: Tue, 18.06.2013 10:59:01

Postby VBI » Sat, 21.09.2013 10:44:01

АД! :)
давай что-то красивое :)
User avatar
VBI
 
Posts: 1965
Joined: Mon, 03.06.2013 09:20:29

Postby g0blinish » Sat, 21.09.2013 10:50:23

VBI wrote:давай что-то красивое

идеи пока исчерпаны уже.
мне вот интересно, насколько можно углубиться в калькулятор?
и, заодно, если обратится к звуку, то где в ПЗУ валяеццо процiдурка PLAY?
[x] No Screenshot
User avatar
g0blinish
Упырь говнофорума
 
Posts: 3641
Joined: Tue, 18.06.2013 10:59:01

Postby introspec » Sat, 21.09.2013 10:55:55

g0blinish wrote: если обратится к звуку, то где в ПЗУ валяеццо процiдурка PLAY?

DE=кол-во периодов, HL=частота, call 949
User avatar
introspec
 
Posts: 579
Joined: Sun, 14.07.2013 15:36:47

Postby g0blinish » Sat, 21.09.2013 11:04:24

Code: Select all
   device zxspectrum128
        ORG #5BFE
begin

lp0:
 ld bc,#5BFE
lp1:
 inc b
 out(c),b
 jr lp1

end
   display /d,end-begin
   savesna "!void.sna",begin



с оговоркой - 5 байт, картинка ужасная)
[x] No Screenshot
User avatar
g0blinish
Упырь говнофорума
 
Posts: 3641
Joined: Tue, 18.06.2013 10:59:01

Postby VBI » Sat, 21.09.2013 11:33:07

introspec, подкинь в топку 16байт!
предлагаю не считать включение графрежимов ТСконфы, 16 только эффекта. мож тсконфисты подтянутся :)
User avatar
VBI
 
Posts: 1965
Joined: Mon, 03.06.2013 09:20:29

Postby introspec » Sat, 21.09.2013 11:40:04

VBI, прямо сейчас у меня 768к варится, не могу. Через недельку-другую подумаю :)
User avatar
introspec
 
Posts: 579
Joined: Sun, 14.07.2013 15:36:47

Postby g0blinish » Sat, 21.09.2013 11:47:24

introspec wrote:VBI, прямо сейчас у меня 768к варится, не могу. Через недельку-другую подумаю :)

отставить флейм) уже тоже пока еще не варится

VBI wrote:предлагаю не считать включение графрежимов ТСконфы

да хоть что-то, хай будет:

при уср0
А=0
ВС=адресу по уср0.
[x] No Screenshot
User avatar
g0blinish
Упырь говнофорума
 
Posts: 3641
Joined: Tue, 18.06.2013 10:59:01


Return to Demos

Who is online

Users browsing this forum: No registered users and 1 guest

x