home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Media Share 9
/
MEDIASHARE_09.ISO
/
private
/
ptd_1.zip
/
RUN.SCR
< prev
next >
Wrap
Text File
|
1992-08-17
|
2KB
|
50 lines
default(miles)
screen(miles,field("Date",date,1,12,10))
screen(miles,field("Session",str,1,38,2))
screen(miles,field("Activity",str,1,59,10))
screen(miles,field("Miles",real,3,27,6))
screen(miles,field("Elapsed_Time",time,3,54,8))
screen(miles,field("Miles_Minute",real,5,27,4))
screen(miles,field("Minutes_Mile",real,5,54,5))
screen(miles,field("Resting",int,7,27,3))
screen(miles,field("Training",int,7,54,3))
screen(miles,field("Weight",int,9,27,3))
screen(miles,field("Time_of_Day",str,9,54,9))
screen(miles,txtfield(1,5,5,"Date:"))
screen(miles,txtfield(1,28,8,"Session:"))
screen(miles,txtfield(1,48,9,"Activity:"))
screen(miles,txtfield(3,14,11," Miles:"))
screen(miles,txtfield(3,39,13,"Elapsed Time:"))
screen(miles,txtfield(5,12,13,"Miles/Minute:"))
screen(miles,txtfield(5,39,13,"Minutes/Mile:"))
screen(miles,txtfield(7,5,9,"Pulse ->"))
screen(miles,txtfield(7,17,8,"Resting:"))
screen(miles,txtfield(7,43,9,"Training:"))
screen(miles,txtfield(9,18,7,"Weight:"))
screen(miles,txtfield(9,40,12,"Time of Day:"))
screen(miles,windowsize(10,77))
screen(kilos,field("Date",date,1,12,10))
screen(kilos,field("Session",str,1,38,2))
screen(kilos,field("Activity",str,1,59,10))
screen(kilos,field("Kilometers",real,3,27,6))
screen(kilos,field("Elapsed_Time",time,3,54,8))
screen(kilos,field("Kilos_Minute",real,5,27,4))
screen(kilos,field("Minutes_Kilo",real,5,54,5))
screen(kilos,field("Resting",int,7,27,3))
screen(kilos,field("Training",int,7,54,3))
screen(kilos,field("Weight",int,9,27,3))
screen(kilos,field("Time_of_Day",str,9,54,9))
screen(kilos,txtfield(1,5,5,"Date:"))
screen(kilos,txtfield(1,28,8,"Session:"))
screen(kilos,txtfield(1,48,9,"Activity:"))
screen(kilos,txtfield(3,14,11,"Kilometers:"))
screen(kilos,txtfield(3,39,13,"Elapsed Time:"))
screen(kilos,txtfield(5,12,13,"Kilos/Minute:"))
screen(kilos,txtfield(5,39,13,"Minutes/Kilo:"))
screen(kilos,txtfield(7,5,9,"Pulse ->"))
screen(kilos,txtfield(7,17,8,"Resting:"))
screen(kilos,txtfield(7,43,9,"Training:"))
screen(kilos,txtfield(9,18,7,"Weight:"))
screen(kilos,txtfield(9,40,12,"Time of Day:"))
screen(kilos,windowsize(10,77))