Принял, счас заминюkalantaj 51982 писал(а):Ну не работает - значит что-то ненормально.
Я понимаю что на других эмулях пашет и на реале тоже но хотелось бы всеядности. Чтоб работало везде.
Да - застёбует перебирать эти старые программы.
Но вот прийдет автор этой программы или тот, кому гифт адресован, и трясущимися руками .ю вспоминая былое, скачает с сайта Алексея эмулятор, саму демку, запустит в эмуле дему и ... БОЛТ с кривой резьбой...
Тем более мне интересно это - поковырять и попробовать найти неисправность и устранить её.
А по делу вот - http://my-files.ru/x0fdcx
Архив темы "МИР в ОПАСНОСТИ сделать некому"
Нет. Не стоит. Программа работает на бейсике. Загрузили картинку и играют музыку через randomize usr. То же и с бегущей строкой. Так что переписывать с бейсика на код считаю нецелесообразным, так как это будет уже совсем другая программа.AAA писал(а):6. RITM 2 Demo
http://zxaaa.net/view_demo.php?id=2456
В деме тормозится музыка)) Но она тормозится жизнью хуёвой а не интом. Чинить наверно не стоит. Наверно стоит. Калантай посомтри стоит?
Выбирай реально нужную задачу из предложенных свыше. Сейчас я нахожу гораздо больше багов, почти каждая 10 дема нуждается в нас - пентагонистах.kalantaj 52030 писал(а):Нет. Не стоит. Программа работает на бейсике. Загрузили картинку и играют музыку через randomize usr. То же и с бегущей строкой. Так что переписывать с бейсика на код считаю нецелесообразным, так как это будет уже совсем другая программа.AAA писал(а):6. RITM 2 Demo
http://zxaaa.net/view_demo.php?id=2456
В деме тормозится музыка)) Но она тормозится жизнью хуёвой а не интом. Чинить наверно не стоит. Наверно стоит. Калантай посомтри стоит?
запускать через usr0!kalantaj 52030 писал(а):Нет. Не стоит. Программа работает на бейсике. Загрузили картинку и играют музыку через randomize usr. То же и с бегущей строкой. Так что переписывать с бейсика на код считаю нецелесообразным, так как это будет уже совсем другая программа.AAA писал(а):6. RITM 2 Demo
http://zxaaa.net/view_demo.php?id=2456
В деме тормозится музыка)) Но она тормозится жизнью хуёвой а не интом. Чинить наверно не стоит. Наверно стоит. Калантай посомтри стоит?
pause 1 в 128 бэсике медленее работает, потому в инт не укладывается.
Облин!daniel писал(а):запускать через usr0!
pause 1 в 128 бэсике медленее работает, потому в инт не укладывается.
Я пользую в работе другой эмуль (тот же Unreal, та же версия, но по сконфигурированный под меня) и у меня всё нормально пашет.
Потому и написал что нормально работает ....
Сцуко... надо засесть и допилить до одного чего то общего....
Потому что как то странно это...
У меня хоть и ПЗУ 48к использована другая, но 128к то стандартная.
И ещё одна демка вылетает наглухо в этом эмуле, а в моём пашет нормуль.
Причем дело именно в ПЗУ 48к - я подставил в этот эмуль другую ПЗУ 48к и всё заработало.
На выходе из программы по регистрам полное соответствие.
Значит дело внатуре в отличиях ПЗУ, но нет желания лопатить ...
можно бут подобрать который запускает в 48-ом с открытыми портами. Только какой не знаю, может кто подскажет.
Wlodek:
Переключение из 128К в 48К "на ходу":
CALL сюда-> DI
LD SP,(23613)
POP HL
LD HL,4867 ; ERR_SP FOR 48-BASIC
PUSH HL
LD HL,7030 ; CONTINUE INTERPRETATOR 48-BASIC
PUSH HL
RES 4,(IY+1); сброс флага 128К
LD DE,5566 ; INFORMATION FOR STREAMS
LD HL,(23631) ; CHANS
LD BC,15
ADD HL,BC
EX DE,HL ; DE=ADDR.FOR STREAMS/CHANNELS, HL=5556
LD C,4 ; BC=4 FOR LDIR
LDIR
EI
RET
; после возврата из этой подпрограммы будет 48К режим с открытым портом #7FFD.
; Если нужно закрыть порт, запишите в него нужный байт по возвращении
; из подпрограммы.
Вызов этой подпрограммы в случае, если на самом деле уже включён Бейсик-48,
не опасен, поэтому специальной проверки на 128К не требуется.
Wlodek:
Переключение из 128К в 48К "на ходу":
CALL сюда-> DI
LD SP,(23613)
POP HL
LD HL,4867 ; ERR_SP FOR 48-BASIC
PUSH HL
LD HL,7030 ; CONTINUE INTERPRETATOR 48-BASIC
PUSH HL
RES 4,(IY+1); сброс флага 128К
LD DE,5566 ; INFORMATION FOR STREAMS
LD HL,(23631) ; CHANS
LD BC,15
ADD HL,BC
EX DE,HL ; DE=ADDR.FOR STREAMS/CHANNELS, HL=5556
LD C,4 ; BC=4 FOR LDIR
LDIR
EI
RET
; после возврата из этой подпрограммы будет 48К режим с открытым портом #7FFD.
; Если нужно закрыть порт, запишите в него нужный байт по возвращении
; из подпрограммы.
Вызов этой подпрограммы в случае, если на самом деле уже включён Бейсик-48,
не опасен, поэтому специальной проверки на 128К не требуется.
Последний раз редактировалось daniel 01 апр 2018, 08:05, всего редактировалось 1 раз.
Лас:
13.03.2013, 17:35
Видел еще такой вариант. Мопед не мой.
DI
LD HL,4867 ;АДРЕС ВОЗВРАТА ПРИ ОШИБКЕ 48BAS
PUSH HL
LD (23613),SP
LD HL,7030 ;АДРЕС ВОЗВРАТА В 48BAS
PUSH HL
LD HL,(23621) ;ТЕКУЩАЯ СТРОКА
LD (23618),HL ;БУДЕТ ВЫПОЛНЯТЬСЯ
LD A,(23623) ;НОМЕР ТЕКУЩЕГО ОПЕРАТОРА
INC A ;УСТАНАВЛИВАЕМ НА СЛЕДУЮЩИЙ
LD (23620),A ;БУДЕТ ВЫПОЛНЯТЬСЯ
LD HL,(23631)
LD DE,15
ADD HL,DE
LD DE,5566
EX DE,HL
LD BC,4
LDIR
LD A,(23611)
AND %11101111
LD (23611),A
EI
RET
13.03.2013, 17:35
Видел еще такой вариант. Мопед не мой.
DI
LD HL,4867 ;АДРЕС ВОЗВРАТА ПРИ ОШИБКЕ 48BAS
PUSH HL
LD (23613),SP
LD HL,7030 ;АДРЕС ВОЗВРАТА В 48BAS
PUSH HL
LD HL,(23621) ;ТЕКУЩАЯ СТРОКА
LD (23618),HL ;БУДЕТ ВЫПОЛНЯТЬСЯ
LD A,(23623) ;НОМЕР ТЕКУЩЕГО ОПЕРАТОРА
INC A ;УСТАНАВЛИВАЕМ НА СЛЕДУЮЩИЙ
LD (23620),A ;БУДЕТ ВЫПОЛНЯТЬСЯ
LD HL,(23631)
LD DE,15
ADD HL,DE
LD DE,5566
EX DE,HL
LD BC,4
LDIR
LD A,(23611)
AND %11101111
LD (23611),A
EI
RET
Последний раз редактировалось daniel 01 апр 2018, 06:41, всего редактировалось 1 раз.
Вариант от Busy:
runusr res 4,(iy+#01) ;; Switch to 48 basic
ld hl,(ramtop) ;; Recontruction of stack for 48 basic
ld (hl),#3E ;; End-of-stack mark for basic
RETURN dec hl ;; (for detect RETURN without GOSUB)
ld sp,hl
ld hl,#1303 ;; Standart error handler
push hl ;; (for displaying error messages)
ld (errsp),sp
jp runbas ;; 7030? Continue in 48 basic interpreter
runusr res 4,(iy+#01) ;; Switch to 48 basic
ld hl,(ramtop) ;; Recontruction of stack for 48 basic
ld (hl),#3E ;; End-of-stack mark for basic
RETURN dec hl ;; (for detect RETURN without GOSUB)
ld sp,hl
ld hl,#1303 ;; Standart error handler
push hl ;; (for displaying error messages)
ld (errsp),sp
jp runbas ;; 7030? Continue in 48 basic interpreter
Но тут вот закрался вопрос. Допустим определили что надо программу запускать из 48к или из 128к, но с включенным интерпритатором 48к бейсика.
ЧТО делать?
Есть два варианта и какой выбрать?
Вариант 1: Залезть в программу, добавить процедуру перехода к 48к бейсику (без сброса).
Вариант 2: Не лопатить программу, а просто добавить вместо существующего свой boot, в котором и будетт происходить переход к нужному режиму и запуск загрузки самой интересующей программы.
Есть плюсы и в том и в другом методе.
В первом плюс - при любом запуске (и через boot и через просто RUN "name" или LOAD "name") и из любого режима будет программа работать правильно.
Во втором огромный плюс в том, что решается проблема за одну минуту удалением существующего бута и записью своего, который просто создаст нужный режим для работы программы. При этом программа сама останется в оригинальном, нетронутом виде. ну или если boot идущий вместе с демкой нужен, то тупо переименовываем его в boot1 и запускаем его с помощью нашего boot, а потом уже стартуем программу.
ЧТО делать?
Есть два варианта и какой выбрать?
Вариант 1: Залезть в программу, добавить процедуру перехода к 48к бейсику (без сброса).
Вариант 2: Не лопатить программу, а просто добавить вместо существующего свой boot, в котором и будетт происходить переход к нужному режиму и запуск загрузки самой интересующей программы.
Есть плюсы и в том и в другом методе.
В первом плюс - при любом запуске (и через boot и через просто RUN "name" или LOAD "name") и из любого режима будет программа работать правильно.
Во втором огромный плюс в том, что решается проблема за одну минуту удалением существующего бута и записью своего, который просто создаст нужный режим для работы программы. При этом программа сама останется в оригинальном, нетронутом виде. ну или если boot идущий вместе с демкой нужен, то тупо переименовываем его в boot1 и запускаем его с помощью нашего boot, а потом уже стартуем программу.
Вот по первому варианту, спасибо Влодеку-покойнечку:
ritm2dfix.zip
ritm2dfix.zip
Вот вторая DEMO COP fixed:
dcopfix.zip
dcopfix.zip
Ну да, можно заготовку с REM сделать - это актуально если вся дема моноблоком. Пользуй конечно, тем более код не мой.kalantaj писал(а):daniel, тогда если ты не против я буду пользоваться именно таким кодовым блоком, но думаю лучше всё-же его в саму программу строить после REM и не грузить дополнительный блок.
Reanimator Mega Gift
http://zxaaa.net/view_demo.php?id=141
Не работает дема КалантайРиндексе мумуляторе? Почему?
Мне видится так:
1. Распаковать всю дему.
2. убрать депачинг
3. собрать
Это самая красивая дема России и ее надо сделать!
Reanimatora, лично знал. Серьезный дядька мы его все в Моксве боялись. )) Я дома у него был в году 1990-91. Когда он только начинал. Он мне писал, вроде бы живет где то за границей. Хотел встретиться. За демосценой следит и возможно, под каким то ником есть. Друг Исаяйа. Входил в состав MKHG. Интересно почитать скроллы, дема наипиздатешая, кто не видел - смотрите!
http://zxaaa.net/view_demo.php?id=141
Не работает дема КалантайРиндексе мумуляторе? Почему?
Мне видится так:
1. Распаковать всю дему.
2. убрать депачинг
3. собрать
Это самая красивая дема России и ее надо сделать!
Reanimatora, лично знал. Серьезный дядька мы его все в Моксве боялись. )) Я дома у него был в году 1990-91. Когда он только начинал. Он мне писал, вроде бы живет где то за границей. Хотел встретиться. За демосценой следит и возможно, под каким то ником есть. Друг Исаяйа. Входил в состав MKHG. Интересно почитать скроллы, дема наипиздатешая, кто не видел - смотрите!
Короче говоря, есть какая то несовместимость мумулятора Унреал Калантай Риндекс с депакингом, именно с кривым депагингом в большинстве дем глюк.
Вот и думайте /Rindex/
Или правьте Унреал или правтье депакинги, которые везде работают кроме мумулятора Калантая покойника битого Алекс Райдером - риндекса.
Вот и думайте /Rindex/
Или правьте Унреал или правтье депакинги, которые везде работают кроме мумулятора Калантая покойника битого Алекс Райдером - риндекса.
Midi Gift
http://zxaaa.net/view_demo.php?id=234
DiskEror в эмулятаре Калантая убитого Алекса Райдером с Хайпа Риндексом
http://zxaaa.net/view_demo.php?id=234
DiskEror в эмулятаре Калантая убитого Алекса Райдером с Хайпа Риндексом
Получи и распишись - http://my-files.ru/pqjjmkAAA 52306 писал(а):Midi Gift
http://zxaaa.net/view_demo.php?id=234
DiskEror в эмулятаре Калантая убитого Алекса Райдером с Хайпа Риндексом
Заменил на рабочий образ. Вот поэтому Украинга Европа а россия жопа. Пришел бы титус (русский Иван) и сказал бы 100100 почему и как и нихуя б не сделал. А вот европеец калантай, салат с огорода срезал, корову подоил, сел да сделал. Поэтому в москве все дорого. Во всем виновата лень , титус и путен.kalantaj 52389 писал(а):Получи и распишись - http://my-files.ru/pqjjmkAAA 52306 писал(а):Midi Gift
http://zxaaa.net/view_demo.php?id=234
DiskEror в эмулятаре Калантая убитого Алекса Райдером с Хайпа Риндексом