eric
/
mysticbbs
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
mysticbbs/mystic/nodespy_ansi.pas

96 lines
5.9 KiB
ObjectPascal
Raw Permalink Normal View History

Add GPL 3 Copyright notice to the top of all source code files
2013-11-10 12:08:54 -08:00
// ====================================================================
// Mystic BBS Software Copyright 1997-2013 By James Coyle
// ====================================================================
//
// This file is part of Mystic BBS.
//
// Mystic BBS is free software: you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation, either version 3 of the License, or
// (at your option) any later version.
//
// Mystic BBS is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with Mystic BBS. If not, see <http://www.gnu.org/licenses/>.
//
// ====================================================================
Initial import
2012-08-21 10:06:16 -07:00
Procedure DrawNodeSpyScreen;
Const
IMAGEDATA_WIDTH=80;
IMAGEDATA_DEPTH=25;
Begin NodeSpy terminal
2012-09-22 17:43:29 -07:00
IMAGEDATA_LENGTH=1114;
IMAGEDATA : array [1..1114] of Char = (
Initial import
2012-08-21 10:06:16 -07:00
#1,#16,'<27>','<27>',#25,#10, #8,'<27>','<27>',#25, #3, #7,'<27>', #0,#23,'<27>',#16,
#25,#23, #9,#26, #4,'<27>',#25, #9,#14,'<27>','<27>','<27>', #7,'<27>', #0,#23,'<27>',
#16,#25, #8, #7,'<27>', #0,#23,'<27>', #8,#16,'g','j','!',#24,' ', #9,#17,
'<27>',#16,'<27>',#17,'<27>', #1,#16,'<27>',#25, #4, #8,'<27>',' ','<27>',' ',' ','<27>',
' ', #1,'<27>','<27>', #9,'<27>',#17,'<27>',#11,#16,'<27>','<27>', #9,#17,'<27>','<27>',#16,
#25, #5, #8,'<27>',#25, #5,#11,#17,'<27>', #9,#16,#26, #3,'<27>', #1,'<27>', #9,
'<27>','<27>',#11,'<27>','<27>', #9,'<27>',#11,'<27>', #9,#26, #3,'<27>',#14,'<27>',' ','<27>',
'<27>','<27>',#15,'<27>','<27>',#14,'<27>','<27>','<27>','<27>','<27>','<27>', #1,'<27>', #9,#26, #4,
'<27>',#17,'<27>','<27>','<27>','<27>', #1,#16,'<27>',#24,' ', #9,'<27>','<27>',#11,'<27>','<27>',
#9,#17,'<27>', #1,#16,'<27>',#25, #5, #8,'<27>','<27>', #1,'<27>', #9,#17,'<27>','<27>',
'<27>','<27>','<27>','<27>','<27>','<27>','<27>',#16,' ', #8,#23,'<27>',#16,'<27>','<27>',' ',' ',
'<27>',' ',' ', #1,'<27>', #9,#17,'<27>',#16,#26, #5,'<27>','<27>','<27>',#17,'<27>',#16,
#26, #4,'<27>',#17,#26, #3,'<27>',#16,#25, #3,#14,'<27>',#26, #3,'<27>','<27>','<27>',
#1,'<27>', #9,'<27>','<27>',#11,'<27>','<27>', #9,'<27>',#11,'<27>', #9,#26, #4,'<27>','<27>',
#8,'<27>',#24,#11,#23,'<27>',#16,' ', #9,'<27>',#26, #3,'<27>',#17,'<27>', #1,#16,
'<27>', #8,'<27>','<27>',#23,'<27>',#16,'<27>', #1,'<27>', #9,#17,'<27>','<27>',#11,#16,'<27>',
#9,#17,'<27>','<27>',#16,'<27>',#17,'<27>','<27>','<27>','<27>','<27>',#16,' ', #8,#17,'<27>',
#16,' ', #9,#17,'<27>','<27>','<27>','<27>','<27>','<27>','<27>',#16,'<27>','<27>','<27>',#17,'<27>',
#1,#16,'<27>',' ',' ', #8,'<27>','<27>',' ', #9,'<27>','<27>','<27>','<27>','<27>',' ', #8,
'<27>',' ', #9,'<27>','<27>','<27>',' ',#14,'<27>','<27>', #9,#26, #4,'<27>',#14,'<27>','<27>',
#1,'<27>', #9,'<27>',#17,'<27>',#16,' ', #8,'<27>','<27>',' ', #1,'<27>', #9,'<27>','<27>',
'<27>', #1,'<27>', #8,'<27>',#24,#23,'<27>',#16,' ', #9,'<27>',#17,'<27>','<27>','<27>',#16,
'<27>','<27>',#17,'<27>','<27>',#16,'<27>','<27>',#17,'<27>','<27>',#16,'<27>',#17,'<27>','<27>','<27>',
'<27>',#16,'<27>', #1,'<27>', #9,'<27>',#17,'<27>','<27>','<27>', #1,#16,'<27>',' ',' ', #9,
#17,'<27>','<27>','<27>','<27>','<27>',#16,' ', #1,'<27>', #9,#17,'<27>',#16,'<27>','<27>',#17,
'<27>','<27>','<27>','<27>', #1,#16,'<27>', #8,'<27>',' ', #9,#17,'<27>','<27>','<27>','<27>','<27>',
#16,' ', #8,#17,'<27>',#16,' ', #9,#17,'<27>','<27>','<27>','<27>','<27>',#16,' ',#11,
'<27>','<27>', #9,'<27>','<27>','<27>','<27>','<27>',#17,'<27>','<27>','<27>',#16,' ', #8,'<27>',' ',
#1,'<27>', #9,'<27>',#17,'<27>','<27>','<27>',#16,' ', #8,#23,'<27>',#24,#16,'<27>',' ',
#1,'<27>', #9,#17,'<27>','<27>','<27>', #1,#16,'<27>',' ',' ','<27>', #9,#17,'<27>','<27>',
#1,#16,'<27>',' ',' ','<27>', #9,#17,'<27>','<27>','<27>', #1,#16,'<27>',' ','<27>', #9,
#17,#26, #3,'<27>', #1,#16,'<27>','<27>','<27>', #9,#17,'<27>','<27>','<27>', #1,#16,'<27>',
' ', #8,'<27>',' ',' ', #1,'<27>','<27>', #9,#17,#26, #3,'<27>', #1,#16,'<27>',' ',
'<27>', #9,#17,'<27>','<27>','<27>', #1,#16,'<27>','<27>', #8,'<27>',' ', #9,#17,#26, #3,
'<27>', #1,#16,'<27>', #9,'<27>',#17,#26, #3,'<27>',#16,'<27>', #1,'<27>', #9,'<27>',#17,
'<27>','<27>','<27>', #1,#16,'<27>', #8,'<27>',' ', #9,#17,'<27>','<27>','<27>', #1,#16,'<27>',
#9,'<27>',' ', #8,#17,'<27>',#24, #1,#16,'<27>','<27>','<27>',#26, #3,'<27>',' ', #8,
#17,'<27>',#16,#26, #3,'<27>','<27>',' ', #1,#26, #4,'<27>',' ', #8,'<27>','<27>',' ',
#1,#26, #3,'<27>',#26, #3,'<27>','<27>',#26, #9,'<27>','<27>','<27>',' ','<27>',#26, #3,
'<27>','<27>','<27>',#26, #4,'<27>', #9,'<27>',#17,#26, #4,'<27>',#16,' ', #1,'<27>',#26,
#3,'<27>',#26, #4,'<27>',' ', #8,'<27>','<27>','<27>',#24,'<27>','<27>','<27>',' ', #1,'<27>',
'<27>','<27>',' ', #8,'<27>',' ',' ','<27>','<27>','<27>',#26, #6,'<27>','<27>',#26, #4,'<27>',
' ', #1,'<27>','<27>','<27>','<27>',' ','<27>','<27>','<27>','<27>','<27>','<27>','<27>',#26, #3,'<27>',
' ', #8,'<27>','<27>','<27>',' ', #1,#26, #7,'<27>',' ',' ',#26, #4,'<27>',#25, #3,
#26, #6,'<27>',' ', #8,'<27>','<27>','<27>',#24,#25, #7,'<27>',#25,#11,'<27>',#25, #5,
#1,'<27>','<27>',#25,#10, #8,'<27>',#25, #3,'<27>',#26,#12,'<27>',' ','<27>',#25, #2,
#15,'N', #7,'o','d','e',' ',#15,'S', #7,'p','y',#25, #2, #8,'<27>','<27>',
#24,'<27>',' ',#15,'#', #7,'#','#',' ', #8,'<27>','<27>',' ',#15,'U', #7,'s',
'e','r',' ', #8,#26,#19,'<27>',' ',#15,'A', #7,'c','t','i','o','n',' ',
#8,#26,'$','<27>',#24,#24,#24,#24,#24,#24,#24,#26,#10,'<27>',' ',#15,'T',
#7,'o','d','a','y',' ', #8,#26, #5,'<27>',' ',#15,'T', #7,'o','t','a',
'l', #8,'<27>',' ',#15,'H', #7,'o','u','r','l','y',' ', #8,#26,#17,'<27>',
' ',#15,'W', #7,'e','e','k','l','y',' ', #8,'<27>',' ',#15,'M', #7,'o',
'n','t','h','l','y',' ', #8,#26, #3,'<27>',#24,#25, #4,#15,'C', #7,'a',
'l','l','s',#24,' ',#15,'N', #7,'e','w',' ',#15,'U', #7,'s','e','r',
's',#24,' ',#15,'M', #7,'s','g',' ',#15,'P', #7,'o','s','t','s',#24,
#25, #3,#15,'E', #7,'m','a','i','l','s',#24,' ',#15,'D', #7,'o','w',
'n','l','o','a','d','s',#24,#25, #2,#15,'U', #7,'p','l','o','a','d',
's',#25,#21, #9,'A', #7,'1','2','3','4','5','6','7','8','9','0','1',
#9,'P', #7,'1','2','3','4','5','6','7','8','9','0','1',' ',' ','S',
'M','T','W','T','F','S',' ',' ','J','F','M','A','M','J','J','A','S',
Begin NodeSpy terminal
2012-09-22 17:43:29 -07:00
'O','N','D',#24,#24, #9,#17,'<27>',#25, #8,#15,'E','S','C', #7,'/',#15,
Initial import
2012-08-21 10:06:16 -07:00
'Q','u','i','t',#25, #4,'A','R','R','O','W','S', #7,'/',#15,'S','e',
Begin NodeSpy terminal
2012-09-22 17:43:29 -07:00
'l','e','c','t',#25, #4,'E','N','T','E','R', #7,'/',#15,'S','e','l',
'e','c','t',#25, #3,'S','P','A','C','E', #7,'/',#15,'T','e','r','m',
'i','n','a','l',#25, #6, #9,'<27>',#24);
Initial import
2012-08-21 10:06:16 -07:00
Begin
Screen.LoadScreenImage(ImageData, ImageData_Length, ImageData_Width, 1, 1);
End;