PC-01 Lviv

It is currently 05 Mar 2024, 10:41

Forum Games WEB Tape Loader Twitter RSS

All times are UTC+03:00




Post new topic  Reply to topic  [ 3 posts ] 
Author Message
PostPosted: 31 Jan 2024, 14:14 
Offline

Joined: 18 May 2016, 19:55
Posts: 425
“ЗАМОК” - гра для ПК-01 "Львів".

В “часи оригіналу ПК-01” ця гра мені дуже подобалась.Але коли настала “ера”
емуляторів, ПК-01 “Львів”, ця іграшка “вилетіла в трубу” в зв'язку зі
спецівкою управління. Іншими словами, клавіші в іграшці задіяні таким чином,
що в емуляторах не зручно або й навіть неможливо управляти. І ось, з
розробкою SEFA ( viewtopic.php?f=20&p=6041#p6041 ), де можна коригувати клавіатуру емулятору, (вихідний код
емулятору), під кожну іграшку окремо, я згадав цю гру та вирішив налагодити її.

Зроблені деякі правки в грі по кольору та інше. Емулятор теж “підточений” під
цю гру.
Attachment:
Замок.7z [278.67 KiB]
Downloaded 14 times
Для тих кому, не цікаві різні тонкощі запускаємо:

Замок\Delphi7.exe, - емулятор з вмонтованою іграшкою “Замок”, автозбереженням,
скомпільований Delphi7,
клавіші управління:
"2" — вниз; "4"- ліворуч; "6"- праворуч; "7" - прижок ліворуч;
"8" — вгору; "9" - прижок праворуч.
Грати потрібно на доп. клавіатурі. Хоча і не обов'язково. :-)


Замок\FPC\_FPC_Project.exe, - емулятор з вмонтованою іграшкою “Замок”,
без автозбереження, скомпільований FPC 2.6.2,
клавіші управління:
"2" — вниз; "4"- ліворуч; "6"- праворуч; "7" - прижок ліворуч;
"8" — вгору; "9" - прижок праворуч.
Грати потрібно на доп. клавіатурі. Хоча і не обов'язково. :-)


папка “ForMOB” - для компіляції в PascalGUI в мобільному, без автозбереження,
клавіші управління:
“4” - прижок ліворуч; “5” - вгору; “6” - прижок праворуч;
“7” - ліворуч; “8” - вниз; “9” - праворуч
Грати потрібно на доп. клавіатурі. Хоча і не обов'язково. :-)


Для тих кому цікаві тонкощі:

Налаштування клавіш в вихідних файлах:

Для Delphi7:
Delphi7\uFORM\uFORM.pas (функція readmask):
...............
{Коригування ЗАМОК}
case keynum of
//{"1"}97:
{"2"}98:keynum:=188;{<}{вниз}
{"4"}100:keynum:=76;{L}{ліворуч}
{"6"}102:keynum:=88;{X}{праворуч}
{"7"}103:keynum:=66;{B}{прижок ліворуч}
{"8"}104:keynum:=190;{>}{вгогру}
{"9"}105:keynum:=77;{M}{прижок праворуч}
end;



Для FPC (2.6.2):
Замок\Program\Emulator\uEmulator_Keyboard.pas (процедура KeyboardProcessing)
..........
{Коригування ЗАМОК}
case ch1 of
{2}50:tmp1KeyStr:=#67;{<}{вниз}
{4}52:tmp1KeyStr:=#51;{L}{ліворуч}
{6}54:tmp1KeyStr:=#64;{X}{праворуч}
{7}55:tmp1KeyStr:=#65;{B}{прижок ліворуч}
{8}56:tmp1KeyStr:=#55;{>}{вгору}
{9}57:tmp1KeyStr:=#61;{M}{прижок праворуч}
end;



ДляPascalGUI (4.0.7):
Замок\Program\Emulator\uEmulator_Keyboard.pas (процедура KeyboardProcessing)
..........
{Коригування ЗАМОК}
case ch1 of
{4}52:tmp1KeyStr:=#65;{B}{прижок ліворуч}
{5}53:tmp1KeyStr:=#55;{>}{вгору}
{6}54:tmp1KeyStr:=#61;{M}{прижок праворуч}
{7}55:tmp1KeyStr:=#51;{L}{ліворуч}
{8}56:tmp1KeyStr:=#67;{<}{вниз}
{9}57:tmp1KeyStr:=#64;{X}{праворуч}
end;


Top
   
PostPosted: 31 Jan 2024, 15:13 
Offline

Joined: 18 May 2016, 19:55
Posts: 425
Звернув увагу, що по закінченні спроб, відбувається вихід з гри в Бейсік і щоб заново почати
гру требу запускати “RUN”. Я наче було виправляв таку ситуацію, але мабуть файли зплутав,
а виправлений десь подівався. :-) Виправляю.
Там, по суті, строку:
3330 IFJZ<1THENEND
треба виправити на:
3330 IFJZ<1THEN RUN

===============

Строка:
700 POKE48696,240:CLS:DIMT(255),XX(16),YY(16):T(251)=1:T(191)=2:T(253)=3:T(239)=4:
T(127)=5:T(247)=6:X=15:Y=18:L=16:JZ=6:LOCATE0,22:PRINT"жжжжжж":COLOR1,4,0
виправлена мною, убрано в кінці строки “COLOR1,4,0”
строка:
600 OUT 193,140
додана мною, так як попередній колір (COLOR1,4,0) мені не подобався.

Delphi7.exe — запускав на копіляцію C_FPC2.6.2fi_.Bat, - випралено.
Attachment:
Arhiw1.7z [184.09 KiB]
Downloaded 12 times


Top
   
PostPosted: 19 Feb 2024, 13:57 
Offline

Joined: 18 May 2016, 19:55
Posts: 425
Attachment:
Вся карта (орг).PNG
Вся карта (орг).PNG [ 55.22 KiB | Viewed 144 times ]
Attachment:
Замок240218.7z [521.05 KiB]
Downloaded 7 times
Папки архіву
_UNITS
AutoSave
Delphi7
ForMOB
FPC
PascalGUI
Program
"Замок(Мої правки)"
"Замок(Оригинал)"
"Карта к?мнати"
"Оцифровка з касети"


Top
   
Display posts from previous:  Sort by  
Post new topic  Reply to topic  [ 3 posts ] 

Forum Games WEB Tape Loader Twitter RSS

All times are UTC+03:00


Who is online

Users browsing this forum: No registered users and 1 guest


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot post attachments in this forum

Search for:
cron
Powered by phpBB® Forum Software © phpBB Limited