Copy Link
Add to Bookmark
Report
NULL mag Issue 09 20 Advanced box drawing
Mystic BBS has a theme editor and with that you can change the looks
of the ANSI boxes displayed. Below we will use the default box editor
and also a MPL script to create a more unique box style for our BBS.
Ofcourse you can use the script to make the box style even cooler.
This is a simple way to beautify the box style.
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ ÜÜ Ü Ü Ü ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
Û pCopnpfpipgpuprpaptpipopnp p pNeptpwpoprpkpipnpgp p pSeprpvpeprpsp p ݲ E d i t o r s °Þ pOtphpeprp p pEpxiptp p Û
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß² ÀÄÄÄÄÄ¿ ±ßßßßßßßßßßßßßßßßßßß
ÛßßßßßßßßßßßßßßßßßßßßßßßßßÜx
Û pU pUpspeprp pEpdpiptpoprp p p p p p p p p p p pÛx
Û pM pMpepnpup pEpdpiptpoprp p p p p p p p p p p pÛx
Û T Theme/Prompt Editor Ûx
ÜÜ ÜÜ °²p Û pB pMpepspspapgpep pBpapspep pEpdpiptpoprp p p pÛx °²pgj!
ÞÛ ÜÜ þ ß Ý °°° ÞÛÛÛÝ Ý ÜÜ Ü Ü Ü ÜÜ Û pG pMpepspspapgpep pGprpopuppp pEpdpiptpoprp p pÛxÜ Ü ÛÛÜÜ
° Û ÛÛÜÜ ÜßÜÜÛÛÛÞÛÛÛÝ ²xßß ß ÜÜÛ Û Û Û Û Û ² ° ßÛ pF pFpiplpep pBpapspep pEpdpiptpoprp p p p p p pÛxÛ Û Û Û Û ± þ
ß{ ² Û Û Û Û ÜÜßÛ²xßÜÛÛÛÛÛ² ÞÛÛÛÝ ² ÞÛÛÛ²±²Û Û Û ÜÜ ÜÜ Û pR pFpiplpep pGprpopuppp pEpdpiptpoprp p p p p pÛx Ü Û Û Û ÝÞ
²x ± ²²²Û ß ßÛÜ Ü Ûßß Û²²²± Þ² ²²²Ü Þ²²²± ßßÛ Û ²²±°Üß Û pS pSpepcpuprpiptpyp pLpepvpeplp pEpdpiptpoprp pÛxÞ ² ²²° ²x
ß Û°°°Û ßßßß Û°°°Û ß°°°°ÛÜÛ°°°Û ß ßß°°°°Û Û pA pAprpcphpipvpep pEpdpiptpoprp p p p p p p p pÛx° ° °Û° ²
°°²ÛÛÛÛ ²ÜÜÜܲ ÛÛÛÛÛ ±Ü ßßßßÛÛÛÛ²ÛÛÛÛÛÛÛÛÛÛ²±Û pP pPprpoptpopcpoplp pEpdpiptpoprp p p p p p p pÛxÜ Ü Ü ÜÜÛ
ÜÜþ ßß² ± °°²ÜÜÜÜÜÜܲßßßßß ²ÛÛÛ ²²²ÛÛÛ²ßßßß Û pE pEpvpepnptp pEpdpiptpoprp p p p p p p p p p pÛxß ß ß Ý°°
° Ý °° þ ßÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛx ßÜ
ßÜÜ ß ÜÜß
+++ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ ÄÄÄ ÄÄ Ä Ä ú
::: (E d i t o r s ) -> Theme/Prompt Editor...
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
Û pCopnpfpipgpuprpaptpipopnp p pNeptpwpoprpkpipnpgp p pSeprpvpeprpsp p pEdpiptpoprpsp p pOtphpeprp p pEpxiptp p Û
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
Ûßßßßßßßßßßßßßßßßßßßßßßßßßßßß E d i t T h e m e ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßÜx
Û Ûx
Û pFiplpep pNpapmpep p³p dqeqfqaquqlqtq q q q q q q q q q q q q q p1:p pPprpopmppptpsp p p p p p p p Ûx
ÜÜ Û pDepspcprpippptpipopnp p³p AqNqSqIq q q q q q q q q q q q q q q q q q q q q q q q q q q p2:p pMpepnpupsp p p p p p p p p p Ûx² g j!
ÞÛ ÜÛ pTepxptp pPpaptphp p³p /qhqoqmqeq/qpqiq/qmqyqsqtqiqcq/qtqeqxqtq/q q q q q q q q q q p3:p pOppptpipopnpsp p p p p p p p ÛxÛ Ü Ü
° Û ÛÛ pMepnpup pPpaptphp p³p /qhqoqmqeq/qpqiq/qmqyqsqtqiqcq/qmqeqnquqsq/q q q q q q q q q p4:p pDpipsppplpapyp pFpiplpepsp p ÛxÛ Û ± þ
ß{ ² Û Û pScprpippptp pPpaptphp p³p /qhqoqmqeq/qpqiq/qmqyqsqtqiqcq/qsqcqrqiqpqtqsq/q q q q q q q p5:p pTpepmppplpaptpepsp p p p p p ÛxÛ Û ÝÞ
²x ± ²Û ³p p6:p pPpeprpcpepnptp pBpaprpsp p p Ûx² ° ²x
ß Û°Û pAplplpopwp pFaplplpbpapcpkp p³p Yqeqsq p7:p pBpopxp pSptpyplpep p1p p p p ÛxÛ ° ²
°°²ÛÛ pAplplpopwp pApSpCIpIp p³p Nqoq q 8 : Box Style 2 Ûx Ü ÜÛ
ÜÜþ Û pAplplpopwp pApNSpIp p³p Yqeqsq p9:p pBpopxp pSptpyplpep p3p p p p Ûx Ý °°
Û pCpolpupmpnp pSpipzpep p³p 8q0q qCqoqlquqmqnq p0:p pBpopxp pSptpyplpep p4p p p p Ûx ß Ü
Û Ûx
ßÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛx
+++ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ ÄÄÄ ÄÄ Ä Ä ú
::: (E d i t T h e m e ) -> Edit theme box style 2...
If you want the box to have a grayish style use the settings below.
You can replace the colors to match your BBS theme style.
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
Û pCopnpfpipgpuprpaptpipopnp p pNeptpwpoprpkpipnpgp p pSeprpvpeprpsp p pEdpiptpoprpsp p pOtphpeprp p pEpxiptp p Û
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
ÛßßßßßßßßßßßÛßßßßßßßßßßßßßßßß B o x S t y l e # 4 ßßßßßßßßßßßßßßßßßÜxßßßßßßßßßÜx
Û Û S HOW EXAMPLE Ûx Ûx
Û pFiplpepÛ pFrpapmpep pTpypppep p p p p³p Sqiqnqgqlqeq q q q q q q q pDEpFpApUpLpTpSp p Ûxsp p p p p p p p Ûx
ÜÜ Û pDepspcprpipÛ pFprpapmpep pCpoplpoprp p1 p³p Sample Ûx p p p p p p p p Ûx² g j!
ÞÛ ÜÛ pTepxptpÛ pFprpapmpep pCpoplpoprp p2 p³p Sample Ûxsp p p p p p p p ÛxÛ Ü Ü
° Û ÛÛ pMepnpupÛ pFprpapmpep pCpoplpoprp p3 p³p Sample Ûxyp pFpiplpepsp p ÛxÛ Û ± þ
ß{ ² Û Û pScprpippptpÛ pFprpapmpep pCpoplpoprp p4 p³p Sample Ûxtpepsp p p p p p ÛxÛ Û ÝÞ
²x ± ²Û Û pUspep pSphpapdpopwp p p p p³p Yqeqsq Ûxtp pBpaprpsp p p Ûx² ° ²x
ß Û°Û pAplplpopwp pFaplpÛ pSphpapdpopw pCpoplpoprp p p³p Sample Ûxyplpep p1p p p p ÛxÛ ° ²
°°²ÛÛ pAplplpopwp pÛ pHpeapdpeprp pCpoplpoprp p p³p Sample Ûxyplpep p2p p p p Ûx Ü ÜÛ
ÜÜþ Û pAplplpopwpÛ pHpepapdpepr pFpoprpmpaptp p³p Cqeqnqtqeqrq Ûxyplpep p3p p p p Ûx Ý °°
Û pCpolpupmpnpÛ pTepxptp pCpoplpoprp p p p p³p Sample Ûxyplpep p4p p p p Ûx ß Ü
Û Û pCopnpfpiprpmp pCpoplpoprp p³p ?S?a?m?p?l?e? ? Ûx Ûx
ßÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛ pBpaprp pLopwp pCpoplpoprp p³p Sample ÛxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛx
Û pBpaprp pLpopwp pKepyp p p p³p Sample Ûx
Û pBpaprp pHipgphp p p p p p p³p ?S?a?m?p?l?e? ? Ûx
Û pBpaprp pHpipgphp pKpepy p p³p >S>a>m>p>l>e> > Ûx
ßÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛx
+++ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ ÄÄÄ ÄÄ Ä Ä ú
::: (B o x S t y l e # 4 ) -> Show box using theme settings...
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
Û pCopnpfpipgpuprpaptpipopnp p pNeptpwpoprpkpipnpgp p pSeprpvpeprpsp p pEdpiptpoprpsp p pOtphpeprp p pEpxiptp p Û
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
ÛßßßßßßßßßßßÛßßßßßßßßßßßßßßßß B o x S t y l e # 4 ßßßßßßßßßßßßßßßßßÜxßßßßßßßßßÜx
Û Û pSHpOpWp pEpXpApMpPpLpEp p Ûx Ûx
Û pFiplpepÛ pFrpapmpep pTpypppep p p p p³p Sqiqnqgqlqeq q q q q q q q pDEpFpApUpLpTpSp p Ûxsp p p p p p p p Ûx
ÜÜ Û pDepspcprpipÛ pFprpapmpep pCpoplpoprp p1 p³p Sample Ûx p p p p p p p p Ûx² g j!
ÞÛ ÜÛ pTepxptpÛ pFprpapmpep pCpoplpoprp p2 p³p Sample Ûxsp p p p p p p p ÛxÛ Ü Ü
° Û ÛÛ pMepnpupÛ pFprpapmpep pCpoplpoprp p3 p³p Sample Ûxyp pFpiplpepsp p ÛxÛ Û ± þ
ß{ ² Û Û pScprpippptpÛ pFprpapmpep pCpopÚÄÄÄÄÄÄÄ Header ÄÄÄÄÄÄÄÄ¿ Ûxtpepsp p p p p p ÛxÛ Û ÝÞ
²x ± ²Û Û pUspep pSphpapdp³ ³ Ûxtp pBpaprpsp p p Ûx² ° ²x
ß Û°Û pAplplpopwp pFaplpÛ pSphpapdpopw pCp³ Example message text? ³ Ûxyplpep p1p p p p ÛxÛ ° ²
°°²ÛÛ pAplplpopwp pÛ pHpeapdpeprp pCp³ ³ Ûxyplpep p2p p p p Ûx Ü ÜÛ
ÜÜþ Û pAplplpopwpÛ pHpepapdpepr pFp³ YES ?N>O? ? ³ Ûxyplpep p3p p p p Ûx Ý °°
Û pCpolpupmpnpÛ pTepxptp pCpoplpÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ Ûxyplpep p4p p p p Ûx ß Ü
Û Û pCopnpfpiprpmp pCpoplor ³ Sample Ûx Ûx
ßÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛ pBpaprp pLopwp pCpoplpoprp p³p Sample ÛxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛx
Û pBpaprp pLpopwp pKepyp p p p³p Sample Ûx
Û pBpaprp pHipgphp p p p p p p³p ?S?a?m?p?l?e? ? Ûx
Û pBpaprp pHpipgphp pKpepy p p³p >S>a>m>p>l>e> > Ûx
ßÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÜxÛx
+++ÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ ÄÄÄ ÄÄ Ä Ä ú
::: (B o x S t y l e # 4 ) -> Show box using theme settings...
With the script below, we just using the #X box command to display
the box as we customized it in the theme editor and also add some
ascii chars and color in the corners, to make it look more badass. :)
uses cfg;
Procedure XWindow(H1:String;T,X1,Y1,X2,Y2:Integer);
Var T1,A1,A2,B1,B2 : String;
Begin;
A1:=Int2Str(X1);
A2:=Int2Str(X2);
B1:=Int2Str(Y1);
B2:=Int2Str(Y2);
T1:=Int2Str(T);
Write('|#X#'+T1+'# '+H1+' #'+A1+'#'+B1+'#'+A2+'#'+B2+'#');
writexy(x1,y1,15,chr(218));
writexy(x2,y2,15,chr(217));
writexy(x1+1,y1, 7,chr(196));
writexy(x1+1,y2, 7,chr(196));
writexy(x2-1,y1, 7,chr(196));
writexy(x2-1,y2, 7,chr(196));
writexy(x1,y1+1, 7,chr(179));
writexy(x1,y2-1, 7,chr(179));
writexy(x2,y1+1, 7,chr(179));
writexy(x2,y2-1, 7,chr(179));
End;
begin
clrscr;
xwindow('hello',2,10,10,50,20);
gotoxy(1,24);
end.
With the script above you can have a box that looks like this:
ÚÄÄÄÄÄÄÄ Header ÄÄÄÄÄÄÄÄ¿
³ ³
³ Example message text? ³
³ ³
³ YES NO ³
ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ
Way cooler... :)
You could also rewrite the script a bit, to use it in Mystic prompts ;)
