2012-09-22 17:42:37 -07:00
|
|
|
|
Procedure DrawTerminalAnsi;
|
|
|
|
|
Const
|
|
|
|
|
IMAGEDATA_WIDTH=80;
|
|
|
|
|
IMAGEDATA_DEPTH=25;
|
2012-09-23 10:22:03 -07:00
|
|
|
|
IMAGEDATA_LENGTH=1112;
|
|
|
|
|
IMAGEDATA : array [1..1112] of Char = (
|
2012-09-22 17:42:37 -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, #7,'<27>',#15,#26,#25,'<27>', #7,'<27>',' ','<27>',#15,#26,#25,'<27>', #7,'<27>',
|
|
|
|
|
' ','<27>',#15,#26, #9,'<27>', #7,'<27>',' ','<27>',#15,#26, #6,'<27>', #7,'<27>',#24,
|
|
|
|
|
#8,#23,'<27>',' ', #0,'S','y','s','t','e','m',' ','N','a','m','e',#25,
|
2012-09-23 10:22:03 -07:00
|
|
|
|
#13, #7,#16,'<27>','<27>', #8,#23,'<27>',' ', #0,'A','d','d','r','e','s','s',
|
|
|
|
|
#25,#17, #7,#16,'<27>','<27>', #8,#23,'<27>',' ', #0,'L','a','s','t','C','a',
|
|
|
|
|
'l','l',' ', #8,#16,'<27>', #7,'<27>', #8,#23,'<27>',' ', #0,'C','a','l','l',
|
|
|
|
|
's',' ', #8,'<27>',#24,#16,'<27>',#26,#26,'<27>', #1,'<27>', #8,#26,#27,'<27>', #1,
|
|
|
|
|
'<27>', #8,#26,#11,'<27>', #1,'<27>', #8,#26, #7,'<27>','<27>',#24,'<27>',#25,'M','<27>',
|
|
|
|
|
#24,'<27>',#25,'M','<27>',#24, #7,'<27>',#25,'M','<27>',#24,'<27>',#25,'M','<27>',#24,
|
|
|
|
|
'<27>',#25,'M','<27>',#24,#15,'<27>',#25,'M','<27>',#24, #7,'<27>',#25,'M','<27>',#24,
|
|
|
|
|
#15,'<27>',#25,'M','<27>',#24,'<27>',#25,'M','<27>',#24,'<27>',#26,'M','<27>','<27>',#24,
|
|
|
|
|
#7,'<27>',#23,#25,#27, #0,'N','o','d','e','S','p','y',' ','T','e','l',
|
|
|
|
|
'n','e','t',' ','D','i','r','e','c','t','o','r','y',#25,#25, #7,#16,
|
|
|
|
|
'<27>',#24,' ', #8,#26,'M','<27>',#24,#25, #2,#15,'E','N','T','E','R', #8,
|
|
|
|
|
':',' ', #7,'C','a','l','l',#25, #3,#15,'A','L','T','+','E', #8,':',
|
|
|
|
|
' ', #7,'E','d','i','t',#25, #3,#15,'I','N','S','E','R','T', #8,':',
|
|
|
|
|
' ', #7,'A','d','d',#25, #3,#15,'D','E','L','E','T','E', #8,':',' ',
|
|
|
|
|
#7,'C','l','e','a','r',#25, #3,#15,'E','S','C','A','P','E', #8,':',
|
|
|
|
|
' ', #7,'Q','u','i','t',#24);
|
2012-09-22 17:42:37 -07:00
|
|
|
|
Begin
|
|
|
|
|
Screen.LoadScreenImage(ImageData, ImageData_Length, ImageData_Width, 1, 1);
|
2012-09-22 21:59:43 -07:00
|
|
|
|
End;
|