savelij13
881739653b
- плагин доделан, описание/history в cdplayer.txt рядом с плагином. FE 1.09 - исправлено: при выходе из редактора с несохраненным файлом и запросе на сохранение клавиша Enter теперь работает как подтверждение сохранения. FN 1.16 - встроенный editor переехал в плагин откуда и запускается по F4, из FN удален. - встроенный viewer переехал в плагин откуда и запускается по F3, из FN удален. - встроенный help переехал в плагин откуда и запускается при нажатии F1, из FN удален. - загрузка плагина отделена от запуска, теперь можно запускать плагины не только из панели FN. - добавлен макрос формирования заголовка для плагинов. - добавлена поддержка работы плагинов в адреса 0x4000-0x7FFF (окно 1) в дополнение к старым 0xC000-0xBFFF (окно 3), пока используется в плагине cdplayer. - в окнах с ошибкой переделан на 2 типа окон вместо многих под каждую ошибку. - исправлена потеря цвета при печати текста по указанному адресу. - текстовым файлам вернул кодировку CP866, readme.md оставлен в кодировке UTF8.
70 lines
1.9 KiB
Plaintext
70 lines
1.9 KiB
Plaintext
|
|
; LAST UPDATE: 15.07.2025 savelij
|
|
|
|
;// DEVICE ZXSPECTRUM128
|
|
;[]=======================================================================[]
|
|
;
|
|
; test.z80 -- test plugin for Flex Navigator v1.xx
|
|
;
|
|
; Created by Anton Enin 08-June-2002
|
|
;
|
|
; Last update 08-June-2002
|
|
;
|
|
; Copyright (C) 2002 R-lab
|
|
;
|
|
; This program should be compiled using z80asm
|
|
; http://www.zxasm.narod.ru/
|
|
;
|
|
;[]=======================================================================[]
|
|
|
|
;// include '../fplugin.inc'
|
|
include macros.a80
|
|
include fn_const.a80
|
|
include fn_macros.a80
|
|
include macros_sp.a80
|
|
include dss_sp.a80
|
|
|
|
HDR_FLX "-TEST"
|
|
|
|
PluginEntry:
|
|
MAKEWINDOW WINSUBOBJ.STORE
|
|
W_MAIN 224,80,192,96
|
|
W_FILL 4,2,184,10,COLORI.BLACK
|
|
W_TEXT 82,3,COLORI.WHITE,"Plugin"
|
|
W_TEXT 16,20,COLORI.BLUE + COLORP.HIGHGRAY,"Flex Navigator v1.xx Plugin Test"
|
|
W_TEXT 46,38,COLORP.HIGHGRAY,"Written by Enin Anton"
|
|
W_TEXT 64,48,COLORP.HIGHGRAY,"June, 8 2002"
|
|
W_TEXT 52,58,COLORP.HIGHGRAY,"Copyright (c) 2002"
|
|
W_BUTTON 60,74,72,14
|
|
W_TEXT 88,77,COLORP.HIGHGRAY,"Ok"
|
|
W_END
|
|
call JUMPS.ResFire
|
|
.plugin_loop:
|
|
ld ix, PluginMouseTab
|
|
call JUMPS.TestCoords
|
|
SPDSS DSSF.SCANKEY
|
|
jr z, .plugin_loop
|
|
ld a, b
|
|
or a
|
|
jr nz, .plugin_loop
|
|
ld a, e
|
|
cp 0x1B
|
|
jr z, PluginExit
|
|
cp 0x0D
|
|
jr nz, .plugin_loop
|
|
PluginExit:
|
|
WINDOWCLOSE
|
|
or a ; cf = 0
|
|
ret
|
|
|
|
;[]=======================================================================[]
|
|
PluginMouseTab:
|
|
dw 0x011C, 0x0164, 0x009A, 0x00A8, 0x0021, 0x0000, PluginExit, 0x0000
|
|
dw 0x0000, 0x00E0, 0x0000, 0x0100, 0x0020, 0x0000, PluginExit, 0x0000
|
|
dw 0x01A0, 0x0280, 0x0000, 0x0100, 0x0020, 0x0000, PluginExit, 0x0000
|
|
dw 0x0000, 0x0280, 0x0000, 0x0050, 0x0020, 0x0000, PluginExit, 0x0000
|
|
dw 0x0000, 0x0280, 0x00B0, 0x0100, 0x0020, 0x0000, PluginExit, 0x0000
|
|
dw 0x8000
|
|
PluginEnd:
|
|
;// savebin 'Build/FN/Plugins/test.flx',PluginStart,PluginEnd-PluginStart
|