Архив ZXNET.

Postby fk0 » 08 Feb 2015, 20:46

* Origin: зип файл! (2:5030/1559)
User avatar
fk0
 
Posts: 1522
Joined: 07 Apr 2007, 01:08
Group: Registered users

Postby lvd » 08 Feb 2015, 21:14

Кстати недавно пытался найти пост в хз-спецтрум, где ты слал процедуры всякоразных умножовываний и делений. Не нашёл. Тут тоже -- ввожу в поиске 'Kirill Frolov' и нихуя не находится. Может, ссылочку дашь сразу?
F̞͖̭̿̔ͯu̐̅cͬ̑ͩk̨̤̳͇̮̭̪̠̽̿̓̆ͭͩ ̷̩̰͎̩͓̘̾̀ͬ̊ͭ͛ͅda̝̺͙̬͎̝̾͟ ̰̜̝̯͉̯̖̓̎́ͨ̽ͫ͟f̟͇̭̀ͬͨͭ̐̚u̹̼̹̗̞͑̔͂͐̚cͭ̅̊̆̒̆ǩ̝̩̯́ͥ̔̍̑ḭ͓͍̳̬ͦ̽͂n͍͎͈̈̅ͩͬ ̊ͫ̂̾̑̈́f̲͚͉͓͗̋́ͧͦ̅ȗ͇̲̻͈̲̅̎͗͒ͭ͡c̬̟̠̹̯̈́ͩ͘ͅk̫̠̻̋͜a̲͒̾̇!͙͕̺͉̗̩̲̂̏̄̀
User avatar
lvd
 
Posts: 7158
Joined: 07 Apr 2007, 21:28
Group: Registered users

Postby DimkaM » 09 Feb 2015, 10:00

https://www.google.ru/?gws_rd=ssl#newwi ... archive.ru
---постадд---
хотя не, тоже ничего нету

хотя я сам эти процедуры когдато видел. учился уножатьделить на их основе. в частности 32*32 заменял в иаре, быстрее однако раза в три вышло и короче
N>"Идите нахуй" со своей политикой...
DimkaM
 
Posts: 1003
Joined: 24 Mar 2010, 12:42
Location: г.Щёлково М.О.
Group: Registered users

Postby DimkaM » 09 Feb 2015, 10:36

сорри за оффтоп.
но раз уж тут одновременно появились лвд и фк0, то может чё подскажут по поводу ещё более сильной оптимизации, но при условии несильного раздувания кода(т.к. либа сёвая)
лично меня напрягают индексные регистры, но как от них избавится хз

умножалка беззнаковых лонгов. bcde-множимое, множитель на стеке. результат в BCHL
Code: Select all
   PUBLIC   ?L_MUL_L03
   RSEG RCODE 
?L_MUL_L03:
   pop af
   ex af,af'
   pop af
   ex af,af'
   ex de,hl
   ex (sp),hl
   push af
   push ix
   push iy
   push hl
   pop iy
   ld ix,0
   ld hl,0
   ld a,IYH
   or IYL
   jr z,no222
   ld a,16
mul222_loop:   ;16*16=16
   add hl,hl
   add iy,iy
   jr nc,nadd
   add hl,de
nadd:
   dec a
   jr nz,mul222_loop
   push hl
   pop ix
no222:   
   ex af,af'
   push af
   pop iy
   ld a,16
mul424_loop2:  ;32*16=32
   add ix,ix
   adc hl,hl
   add iy,iy
   jr nc,nadd2
   add ix,de
   adc hl,bc
nadd2:
   dec a
   jr nz,mul424_loop2
   ld b,h
   ld c,l
   push ix
   pop hl
   pop iy
   pop ix
   pop af
   pop de
   push af
   ret
N>"Идите нахуй" со своей политикой...
DimkaM
 
Posts: 1003
Joined: 24 Mar 2010, 12:42
Location: г.Щёлково М.О.
Group: Registered users

Postby lvd » 09 Feb 2015, 22:24

Насчёт оптимизации по размеру ничего не скажу, разве что убрать цикл 16*16->16, заюзав вместо него цикл 16*32->32 и занулив нужные реги.

upd: ещё чо в голову пришло, вместо ix iy можно попробовать изобрести чонить с exx:add hl,ss:exx:add hl,ss -- типа такого. Вдруг короче выйдет.
F̞͖̭̿̔ͯu̐̅cͬ̑ͩk̨̤̳͇̮̭̪̠̽̿̓̆ͭͩ ̷̩̰͎̩͓̘̾̀ͬ̊ͭ͛ͅda̝̺͙̬͎̝̾͟ ̰̜̝̯͉̯̖̓̎́ͨ̽ͫ͟f̟͇̭̀ͬͨͭ̐̚u̹̼̹̗̞͑̔͂͐̚cͭ̅̊̆̒̆ǩ̝̩̯́ͥ̔̍̑ḭ͓͍̳̬ͦ̽͂n͍͎͈̈̅ͩͬ ̊ͫ̂̾̑̈́f̲͚͉͓͗̋́ͧͦ̅ȗ͇̲̻͈̲̅̎͗͒ͭ͡c̬̟̠̹̯̈́ͩ͘ͅk̫̠̻̋͜a̲͒̾̇!͙͕̺͉̗̩̲̂̏̄̀
User avatar
lvd
 
Posts: 7158
Joined: 07 Apr 2007, 21:28
Group: Registered users

Postby fk0 » 09 Feb 2015, 23:17

lvd wrote:Кстати недавно пытался найти пост в хз-спецтрум, где ты слал процедуры всякоразных умножовываний и делений. Не нашёл. Тут тоже -- ввожу в поиске 'Kirill Frolov' и нихуя не находится.


Ищи архивы фидошников, проси переписать. Дело труба: google купил архив у dejanews чтобы... похерить его. Они убрали google groups из каталога, сломали поиск, похерили куда-то половину сообщений в CP866. Думаешь это просто так? Вот фиг. Это план. В чём он -- не знаю деталей, но он очевиден. Наверное, интернет не должен быть средством коммуникации между людьми, а скорей эдаким вариантом телевизора, когда только Google, Amazon и т.п. будут иметь право на запись, остальные -- только на чтение.

У меня есть кое-какие архивы, но немного и систематизировать нужно. Я думаю, у многих есть сильно больше. Неплохо бы это загнать в NNTP-базу (потому, что софты есть готовые) и проиндексировать. Google за тебя это делать не будет.
* Origin: зип файл! (2:5030/1559)
User avatar
fk0
 
Posts: 1522
Joined: 07 Apr 2007, 01:08
Group: Registered users

Postby DimkaM » 10 Feb 2015, 08:41

lvd wrote:Насчёт оптимизации по размеру ничего не скажу, разве что убрать цикл 16*16->16, заюзав вместо него цикл 16*32->32 и занулив нужные реги.
надо попробывать, а в освободифшееся место попробывать заюзать под разлупливание лупа.
мож чё и выйдет путное

вообще я заметил правило в иаролибе: неиспользование ундок операторов. хотя иаро-асм их понимает
N>"Идите нахуй" со своей политикой...
DimkaM
 
Posts: 1003
Joined: 24 Mar 2010, 12:42
Location: г.Щёлково М.О.
Group: Registered users

Postby lvd » 13 Feb 2015, 17:24

Нашёл архив с 2009ого тут: http://ftn.su/
Описанные выше события происходили куда как сильно древнее чем.
Также на гугле есть архив fido7.zx.spectrum, но вэсь рюски букъва там нахер безвозвратно похерено в ????
F̞͖̭̿̔ͯu̐̅cͬ̑ͩk̨̤̳͇̮̭̪̠̽̿̓̆ͭͩ ̷̩̰͎̩͓̘̾̀ͬ̊ͭ͛ͅda̝̺͙̬͎̝̾͟ ̰̜̝̯͉̯̖̓̎́ͨ̽ͫ͟f̟͇̭̀ͬͨͭ̐̚u̹̼̹̗̞͑̔͂͐̚cͭ̅̊̆̒̆ǩ̝̩̯́ͥ̔̍̑ḭ͓͍̳̬ͦ̽͂n͍͎͈̈̅ͩͬ ̊ͫ̂̾̑̈́f̲͚͉͓͗̋́ͧͦ̅ȗ͇̲̻͈̲̅̎͗͒ͭ͡c̬̟̠̹̯̈́ͩ͘ͅk̫̠̻̋͜a̲͒̾̇!͙͕̺͉̗̩̲̂̏̄̀
User avatar
lvd
 
Posts: 7158
Joined: 07 Apr 2007, 21:28
Group: Registered users

Postby lvd » 13 Feb 2015, 17:27

DimkaM wrote:вообще я заметил правило в иаролибе: неиспользование ундок операторов. хотя иаро-асм их понимает

По факту, железный зетник до сих пор где-то, сука, производится с тех древних масок и по тем древним нормам в 5мкм (ну мож шринкнули до 2-3), и со всеми ундок командами.
Так что смело всё, кроме аут (ц),00 или ФФ можно уж давно считать документированными и спокойно юзать.
F̞͖̭̿̔ͯu̐̅cͬ̑ͩk̨̤̳͇̮̭̪̠̽̿̓̆ͭͩ ̷̩̰͎̩͓̘̾̀ͬ̊ͭ͛ͅda̝̺͙̬͎̝̾͟ ̰̜̝̯͉̯̖̓̎́ͨ̽ͫ͟f̟͇̭̀ͬͨͭ̐̚u̹̼̹̗̞͑̔͂͐̚cͭ̅̊̆̒̆ǩ̝̩̯́ͥ̔̍̑ḭ͓͍̳̬ͦ̽͂n͍͎͈̈̅ͩͬ ̊ͫ̂̾̑̈́f̲͚͉͓͗̋́ͧͦ̅ȗ͇̲̻͈̲̅̎͗͒ͭ͡c̬̟̠̹̯̈́ͩ͘ͅk̫̠̻̋͜a̲͒̾̇!͙͕̺͉̗̩̲̂̏̄̀
User avatar
lvd
 
Posts: 7158
Joined: 07 Apr 2007, 21:28
Group: Registered users

Postby fk0 » 16 Feb 2015, 11:32

lvd wrote:Также на гугле есть архив fido7.zx.spectrum, но вэсь рюски букъва там нахер безвозвратно похерено в ????


Если нажмёшь view original, то рюски буква вернётся. Но поиск из-за этого не работает. И скачать оптом много сообщений невозможно.
* Origin: зип файл! (2:5030/1559)
User avatar
fk0
 
Posts: 1522
Joined: 07 Apr 2007, 01:08
Group: Registered users

Next

Return to ZX Spectrum

Who is online

Users browsing this forum: No registered users and 2 guests

cron