Т > WinLib Т BASIC Library Procedures Т by Alan Blundell (Т for Master Series only 2Т (C) BAU July 1990 <Т Updated by J.G.Harston F: P`Т Requires global control block at X%, Y%=X%DIV256 large enough for longest title + 16 bytes ZEТ eg DIM ctrl% 48:X%=ctrl%:Y%=X%DIV256 allows 32-character titles d6Т On startup, do *WCLEAR to clear all windows data n: xщРwin_closeall ┌!X%=&00404:A%=193:ж&FFF1 ▄А √: ═щРwin_close ╙!X%=&10404:A%=193:ж&FFF1 ЄА Ў: хщРwin_release р!X%=&20404:A%=193:ж&FFF1 эА Ф: ПщРwin_title(title$) З$(X%+14)=title$ А : BщРwin_colours(fore%,back%,barcol%,barback%,edgecol%,edgeback%) "6X%?8=fore%:X%?9=back%:X%?10=barcol%:X%?11=barback% ,"X%?12=edgecol%:X%?13=edgeback% 6А @: J1щРwin_open(action%,left%,bottom%,right%,top%) T(!X%=15+╘$(X%+14):X%?1=4:X%?2=action% ^1X%?4=left%:X%?5=bottom%:X%?6=right%:X%?7=top% hA%=193:ж&FFF1 rА Ъ