home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Oakland CPM Archive
/
oakcpm.iso
/
cpm
/
database
/
scrivner.lbr
/
SCHOOL.SCR
< prev
next >
Wrap
Text File
|
1986-12-13
|
3KB
|
69 lines
#announce ^j^j^j
#define _TERM_,,Autumn
#define _YEAR_,,1986
#define _WHEN IT BEGINS_,,September 11th 1986.
#input _THE BOYS NAME_,,Enter the pupil's name
#input _HIS FORM_,,What form is he in
#default 00
#announce For the following questions press return for 0.
#input _THE FEES_,,What fees should be paid
#input _DISCOUNT_,,What discount for second child
#input _LUNCHES_,,Enter the lunch costs
#input _PIANO_,,Enter piano costs
#input _MUSIC BOOKS_,,Enter the costs of music books
#input _SPEECH_TRAINING_,,Enter the costs of speech training
#input _BRASS_,,Enter the brass costs
#input _INSTRUMENT HIRE_,,Enter the costs of instrument hire
#input _SURCHARGE_,,Enter the surcharge
#input _HOW MANY_,,Enter the number of extras
[[def 8.2t]]
Dotheboys Hall School Ltd
Duncaning
Duncaning 3549
_TERM_ Term _YEAR_
Name:- _THE BOYS NAME_ Form _HIS FORM_
----------------------------------------------------------------
Fees | [[ _THE FEES_]]
discount fo≥ 2nΣ chilΣ ⁿ [[z -_TH┼ FEES_*(_DISCOUNT_/100)]]
|-------------
|
Total fees | [[t ftotal]]
|
Lunches | [[b _LUNCHES_]]
|
Piano | [[b _PIANO_]]
Music Books | [[b _MUSIC BOOKS_]]
|
Speech Training | [[b _SPEECH_TRAINING_]]
|
Brass | [[b _BRASS_]]
Instrument Hire | [[b _INSTRUMENT HIRE_]]
|
Extras:- | [[sz _HOW MANY_]]
#repeat #include school.inc,,_HOW MANY_
|
Surcharge | [[b _SURCHARGE_]]
|-------------
|
# | [[t total]]
=============
[[dm totals]]
[[dp [[,,total,,^]^] _THE BOYS NAME_ ^j^m]]
[[dm CON:]]
[[dp ,,total,, _THE BOYS NAME_ ^j^m ]]
Cheques should be crossed and made payable to Dotheboys Hall School Ltd
FEES ARE PAYABLE STRICTLY IN ADVANCE AND MUST BE RECEIVED BY THE FIRST DAY
OF THE NEW TERM
Next Term Begins _WHEN IT BEGINS_è.pa