@APC74, post #3
@APC74, post #3
@Dopuser, post #5
GetSize {KATALOG} TERSE >ENV:GetCatalogSize IF $GetCatalogSize GT 681574400 ;dla 650MB Eval $GetCatalogSize / 1048576 >ENV:EvalMB RequestChoice TITLE "Błąd wypalania" BODY "Katalog za duży*n(ponad $EvalMB MB)" OK >NIL: SKIP END ENDIF mkisofs -U -iso-level 3 -V {VOLUME_NAME} -o T:image.iso {PATH} dvdrecord (sprawdź napęd) IF WARN RequestChoice TITLE "Błąd wypalania" BODY "Brak płyty! Wsadź płytę i naciśnij OK" OK >NIL: Wait 5 ENDIF dvdrecord speed=2 T:image.iso LAB END ============================================ ================== LUB ===================== ============================================ GetSize {KATALOG} TERSE >ENV:GetCatalogSize IF $GetCatalogSize GT 681574400 ;dla 650MB Eval $GetCatalogSize / 1048576 >ENV:EvalMB RequestChoice TITLE "Błąd wypalania" BODY "Katalog za duży*n(ponad $EvalMB MB)" OK >NIL: SKIP END ENDIF mkisofs -U -iso-level 3 -V {VOLUME_NAME} -o T:image.iso {PATH} LAB DevChk dvdrecord (sprawdź napęd) IF WARN Wait 5 SKIP DevChk BACK ENDIF dvdrecord speed=2 T:image.iso LAB END
@Dopuser, post #8