home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
DP Tool Club 25
/
CD_ASCQ_25_1095.iso
/
dos
/
graphic
/
show70
/
rmp.shw
< prev
next >
Wrap
Text File
|
1995-08-01
|
6KB
|
225 lines
;*********************************************************************;
; Scriptname.: RMP.SHW ;
; Date.......: Aug. 1995, copyright by RMP DATA. ;
; Purpose....: Promotion for DATASHOW v. 7.0A, as an example script. ;
;*********************************************************************;
SET GRAPHICS VGA1
SET DOUBLE OFF
COLOR FOREGROUND 1
DRAW BAR 100 25
COLOR FOREGROUND 14
EFFECT TEXTTYPE 3 6
GOXY 9 2
WRITE "DataShow Example."
COLOR FOREGROUND 15
EFFECT TEXTTYPE 0 1
GOXY 10 8
WRITE "On the following pages You'll see an electronic job application."
GOXY 10 10
WRITE 'This "real life example" can give You yet another idea about the'
GOXY 10 11
WRITE "many things that You can do with DataShow."
GOXY 30 25 WRITE 'Press "PgDn" to continue.'
WAIT
SCREEN CLEAR
SPRITE "PENCIL.SPR" LOAD
COLOR FOREGROUND 15
DRAW BAR 100 25
DO FILE "LINES.SHW"
SET DELAYFACTOR 3
EFFECT TEXTTYPE 0 1
EFFECT TEXTPLACE 0 1
COLOR FOREGROUND 0
SPRITE "PENCIL.SPR" GOXY 10 5
SPRITE "PENCIL.SPR" SHOW
GOXY 6 2
WRITE "Dear Sir."
GOXY 60 2
WRITE "Copenhagen, August 1995."
GOXY 8 4
WRITE "My name is Rene Michael Plambek. I have just turned 30. In 1991 I"
GOXY 8 5
WRITE "received my Master of Business Administration and Computer Science"
GOXY 8 6
WRITE "degree, after many years of hard studying. I'll Get back to my re-"
GOXY 8 7
WRITE "sume a little later on."
GOXY 8 9
WRITE "Today I'm working as a chief of a section that is in charge of all"
GOXY 8 10
WRITE "EDP in a large Arbitrage Department in a large Danish Bank. My sec-"
GOXY 8 11
WRITE "tion consists of 6 people."
GOXY 8 13
WRITE "In my spare time, I've programmed this presentation package You're"
GOXY 8 14
WRITE "looking at now. Since I do not do much programming at work, I have"
GOXY 8 15
WRITE "found this to be a good and fun way to keep my skills up to date."
GOXY 8 17
WRITE "On the following pages You'll be able to see, some of the academic"
GOXY 8 18
WRITE "and practical things I've been through over the years. As You can"
GOXY 8 19
WRITE "probably see by now, strategy and creativity are among my forces..."
GOXY 6 21 WRITE "Sincerely"
EFFECT TEXTTYPE 3 1
EFFECT TEXTPLACE 0 2
COLOR FOREGROUND 1
GOXY 6 22 WRITE "Rene Michael Plambek"
SET DELAYFACTOR 0
EFFECT TEXTTYPE 0 1
EFFECT TEXTPLACE 0 1
COLOR FOREGROUND 0
WAIT 0.5
GOXY 30 25 WRITE 'Press "PgDn" for resume.'
WAIT
SCREEN CLEAR
COLOR FOREGROUND 15
DRAW BAR 100 25
DO FILE "LINES.SHW"
EFFECT TEXTTYPE 1 4
COLOR FOREGROUND 3
GOXY 25 2 WRITE "Curriculum Vitae"
EFFECT TEXTTYPE 0 1
EFFECT TEXTPLACE 0 0
COLOR FOREGROUND 0
GOXY 6 5
WRITE "Personal data:"
GOXY 8 6
WRITE "Name..........: Rene Michael Plambek"
GOXY 8 7
WRITE "Address.......: Fussingsvej 1, 1. sal"
GOXY 8 8
WRITE "Zip, City.....: DK-2300 Copenhagen S."
GOXY 8 9
WRITE "Country.......: Denmark"
GOXY 8 10
WRITE "Phone.........: +45 31 59 00 59"
GOXY 6 12
WRITE "Academic career:"
GOXY 8 13
WRITE "-1981 The Danish 10 year folk school"
GOXY 8 14
WRITE "1981-1982 Fletcher Senior High School in Florida, USA"
GOXY 8 15
WRITE "1982-1984 The Danish 2 year HF preparation exams"
GOXY 8 16
WRITE "1984-1988 Bachelor of Business Administration and Computer Science"
GOXY 8 17
WRITE "1988-1991 Master of Business Administration and Computer Science"
GOXY 6 19
WRITE "Natural languages:"
GOXY 8 20
WRITE "Danish, English Fluent in writing and speaking"
GOXY 8 21
WRITE "German Can understand, write and speak"
GOXY 8 22
WRITE "Swedish, Norwegian Can understand and be understood"
GOXY 30 25 WRITE 'Press "PgDn" to continue.'
WAIT
SCREEN CLEAR
COLOR FOREGROUND 15
DRAW BAR 100 25
DO FILE "LINES.SHW"
EFFECT TEXTTYPE 1 4
EFFECT TEXTPLACE 0 1
COLOR FOREGROUND 3
GOXY 18 2 WRITE "Curriculum Vitae (cont'd)"
EFFECT TEXTTYPE 0 1
EFFECT TEXTPLACE 0 2
COLOR FOREGROUND 0
GOXY 6 5
WRITE "Professional career:"
GOXY 8 6
WRITE "1985-1988 EDP counselar and tutor at Copenhagen Business College"
GOXY 8 7
WRITE " - Wrote book about DBase III."
GOXY 8 8
WRITE "1987-1989 Programmer, technician and educator for small EDP"
GOXY 8 9
WRITE " company selling HW/SW and education."
GOXY 8 10
WRITE "1989-1991 Unibank A/S student worker, 20 hours per week"
GOXY 8 11
WRITE "1991-1992 Unibank A/S full time assistent manager, in planning"
GOXY 8 12
WRITE " department with EDP coordination projects."
GOXY 8 13
WRITE "1992-1994 Unibank A/S group leader in charge of large Novell"
GOXY 8 14
WRITE " installation, and Special Arbitrage applications."
GOXY 8 15
WRITE "1994- Unibank A/S section leader in charge of all installa-"
GOXY 8 16
WRITE " tions on PC and mainframe for a large Arbitrage de-"
GOXY 8 17
WRITE " partment."
GOXY 6 19
WRITE "Courses (from the job):"
GOXY 8 20
WRITE "OS/2; Setup, introduction and Query manager."
GOXY 8 21
WRITE "SQL; an introduction to."
GOXY 8 22
WRITE "Project management."
GOXY 8 23
WRITE "Introduction to leadership."
GOXY 30 25 WRITE 'Press any key to continue.'
WAIT
GOXY 1 1
COLOR FOREGROUND 1
DRAW BAR 100 25
COLOR FOREGROUND 15
EFFECT TEXTTYPE 0 1
GOXY 10 8
WRITE "This concludes the small example of an electronic job application."
GOXY 10 10
WRITE 'This "real life example" can give You yet another idea about the'
GOXY 10 11
WRITE "many things that You can do with DataShow."
GOXY 10 13
WRITE "You can add special effects to an application, such as colors and"
GOXY 10 14
WRITE 'sounds - Yet another "show" to market, not a product this time,'
GOXY 10 15
WRITE "but Yourself."
GOXY 30 25 WRITE 'Press any key to end.'
WAIT