home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Media Share 9
/
MEDIASHARE_09.ISO
/
clarion
/
tkmengen.zip
/
DRSMENU.CLA
< prev
next >
Wrap
Text File
|
1990-03-23
|
1KB
|
30 lines
!SCREEN SCREEN HUE(7,1)
ROW(1,1) PAINT(1,80),HUE(0,3)
ROW(25,1) PAINT(1,80),HUE(0,3)
ROW(19,23) PAINT(5,37),HUE(4,7)
ROW(7,6) PAINT(10,70),TRN
ROW(6,5) STRING('┌─{70}┐')
ROW(7,5) REPEAT(10);STRING('│<0{70}>│') .
ROW(17,5) STRING('└─{70}┘')
ROW(18,22) STRING('╔═{37}╗')
ROW(19,22) REPEAT(5);STRING('║<0{37}>║') .
ROW(24,22) STRING('╚═{37}╝')
ROW(8,16) STRING('/{8} {13}/{10} {15}/{11}')
ROW(9,15) STRING('/{10} {11}/{11} {14}/{11}')
ROW(10,14) STRING('//// //// {10}//// //// {13}/{5}')
ROW(11,13) STRING('//// //// {10}//// //// {13}/{12}')
ROW(12,12) STRING('//// //// {10}/{11} {14}/{12}')
ROW(13,11) STRING('//// //// {10}/{13} {19}/{5}')
ROW(14,10) STRING('/{10} {11}/{5} {5}//// {12}/{11}')
ROW(15,10) STRING('/{8} {12}/{5} {5}/{5} {11}/{11}')
ROW(19,29) STRING('Name of your software Here')
ROW(20,40) STRING('BY')
ROW(21,37) STRING('your name')
ROW(22,32) STRING('COPYRIGHT 1989,1990')
COL(61) STRING(' '),HUE(14,1)
ROW(23,32) STRING('ALL RIGHTS RESERVED')
! .