fic$ = _dosCmd$ fic$ = ZTRIM$(fic$) mx% = _X / 2,my% = _Y / 2 OPENW #1,mx% - 320,my% - 200,640,400,0 IF LEN(fic$) = 0 fic$ = "c:\winnt\pbspin.avi" ENDIF IF NOT EXIST(fic$) FILESELECT "*avi","",fic$ ENDIF IF NOT EXIST(fic$) EDIT SYSTEM ENDIF MCI "open " + fic$ + " alias intro" MCI "window intro handle " + STR$(WIN(1)) MCI "put intro destination at 0 0 638 398" MCI "play intro notify" ~LEN(MCI$("play intro notify" ,WIN(1))) IF _EAX = 0 DO PEEKEVENT LOOP UNTIL MENU(1) = 4 OR _Mess = $3B9 ENDIF MCI "close intro" CLOSEW #1