
(message ("\n\n\n\n\n\nPlease insert %s disk %lc in drive %s" @app-name #diskno #CI_drive))
	(if
		(= 0 (run ("%s %ld %s %skiprob% >con:10/10/340/200//CLOSE/WAIT" #diskimager #CI_unit (tackon #dest ("%diskfile%%lc" #diskno)) ) ) )
		("")
		(abort ("\"%s\" must be in your PATH !" #diskimager))
	)
