Hi Derek, 100 DEFine PROCedure p 110 ERT HOT_KEY('g',CHR$(27)) 120 EX RAM1_Dm5_Obj 130 WAIT 20 140 HOT_DO('g') 150 WAIT 20 160 HOT_DO('g') 170 WAIT 20 180 HOT_DO('g') 190 ERT HOT_REMV('g') 200 END DEFine p
Adjust the key, timings and drive to suit your system. At least you won't have to type in the date anymore. Have fun Wolfgang _______________________________________________ QL-Users Mailing List