Task

Spawn a new process which can run simultaneously with, and independently of, the original parent process.




SYSTEM( RUN )
 
WRITE(Messagebox='?Y', IOStat=ios) "Another Fork?"
IF(ios == 2) ALARM(999) ! quit immediately
 
! assume this script is stored as 'Fork.hic'
SYSTEM(SHell='Fork.hic')
 
BEEP("c e g 'c")
WRITE(Messagebox="!") "Waiting ..."
ALARM(999)              ! quit immediately 