ЭТЮДЫ

[Destr]

вот то-то и оно, я порядком подзабыл про расчеты, 1ddkit писали ранее.

В общем получается надо вспоминать высшую математику и злобно перебирать алгоритмы (на предмет прикрутить к спеку).
С такими кривулями (ну шляпа эта) вроде как хорошо юзать комплексные числа (ненастоящие конечно, а их табличный образ).
А вообще у алонекодера лучше спросить напрямки, ибо все остальные только "на глазок" подскажут, а Дима на таких приколах не одну собаку съел, он точно скажет (если конечно поймаешь его...)

P.S. А вообще алгоритм прикольный. Я тут потихоньку компилятор бэйсика шлепаю, вот когда он сумеет эту прогу выполнить - буду считать что компиль готов! Сенкс за образец!

[goblinish]

Построение ifs-фрактала - папоротник.
всю голову сломал

нашел. почему-то исхдник был без комментария
http://zxpress.ru/article.php?id=7933&lng=eng

[AAA]

Построение ifs-фрактала - папоротник.
всю голову сломал

нашел. почему-то исхдник был без комментария

Папартников кучу насоздавали, это не красиво, а вот нормальный фрактал на спеки не делали:

http://zxaaa.untergrund.net/GLOBALC.html

Fractalz

[goblinish]

Папартников кучу насоздавали, это не красиво, а вот нормальный фрактал на спеки не делали:

http://zxaaa.untergrund.net/GLOBALC.html

Fractalz

Gemba строит ifs - дракон, коралл, спираль и другие извраты. тебе видней, нормальные или нет.
в общем, сунулся в исходник, ерунда получается, не строит по параметрам. то ли посчитал неправильно, то ли еще что..

[AAA]

Вот красива:








А вот некрасиво:






Вот фрактал перехода картинки который можно реализовать на спеки:

[goblinish]

те IFS,в которые я уперся - красиво:

[alone]

Вот фрактал перехода картинки который можно реализовать на спеки:

Было же!

[goblinish]

Было же!

АА категориями мыслит

[goblinish]

http://www.sulaco.co.za/opengl_proje...e_textures.htm
уфф, нашел приличный алгоритм, там и фракталы все...

[goblinish]

интересная процедура гашения надписи, печать текста написал сам.

;Cannonball (19xx)(Hooy).tap demo
    device zxspectrum128
        ORG #61a8
begin

 ld hl,#5800;адрес атрибутов экрана
;--------заполним черным цветом
m0:
 ld(hl),0:inc hl
 ld a,h:cp #5b:jr nz,m0
;---печать текста
 ld hl, #5800,ix,message
m1:
 ld a,(ix):or a:jr z,begfade; если код сообщения 0, то переходим к гашению
 inc ix
 push hl:ld l,a,h,0
 add hl,hl:add hl,hl:add hl,hl; каждый символ состоит из 8 байт, умножим код на 8
 ld de,#3C00:add hl,de;#3C00 - адрес, где хранятся символы
 ld de,hl
 pop hl:push hl
 ld a,8
m3: ld b,#80
 exa
m2: ld a,(de):and b:jr z, writeatr
 ld a,56; атрибут paper= белый(7)*8
writeatr:
 ld (hl),a:inc hl
 rrc b:jr nc, m2
 ld bc,24:add hl,bc; 24=32-8, отрисовали 8 знаков, перейдем к следующей линии
 inc de
 exa:dec a:jr nz,m3
 pop hl:ld bc,8:add hl,bc; символ нарисован, переход на 8
 jp m1
;----------------------------------гашение
begfade:
;---------------------------------- ждем нажатия пробел
waitkey:
        LD A,#7F:IN A,(#FE)
        RRA:JR C,waitkey

 LD            B ,$32
L9D78:
 PUSH          BC
 CALL          L9DCD
 POP           BC
 DJNZ          L9D78

stu jr stu; заглушка
message: db "TEXT",0
L9DCD:
  LD            IX ,$5800;9DCD
  LD            B ,$16
L9DD3:
  PUSH          BC;9DD3
  LD            B ,$1F
L9DD6:
  PUSH          BC;9DD6
  LD            HL ,$0000
  LD            D ,$00
  LD            E ,(IX-$20   )
  ADD           HL ,DE
  LD            E ,(IX+$01   )
  ADD           HL ,DE
  LD            E ,(IX-$01   )
  ADD           HL ,DE
  LD            E ,(IX+$20   )
  ADD           HL ,DE
  SRL           L
  SRL           H
  SRL           L
  SRL           H
  LD            A ,L
  LD            ( IX+$00), A
  INC           IX
  POP           BC
  DJNZ          L9DD6

  INC           IX
  POP           BC
  DJNZ          L9DD3

  ei:HALT
  RET

end
    display /d,end-begin
    savesna "test.sna",begin