Tham khảo tài liệu 'ebook collection software ver part 61', công nghệ thông tin, kỹ thuật lập trình phục vụ nhu cầu học tập, nghiên cứu và làm việc hiệu quả | Set default values for variables Cho biến các giá trị mặc định ----------------------------------------------- StrCpy PROGRAMEXE EXE dùng thiết lập mặc định StrCpy PROGRAMPARMS. StrCpy SPLASHSCREEN enabled cho phép splashscreen ---------------------------------------------- Kiểm tra cấu hình thư mục nào được dùng và thiết lập các biến theo đó ---------------------------------------------- IfFileExists EXEDIR App APP PROGRAMEXE. CheckPortableDIR StrCpy PROGRAMDIR EXEDIR App APP StrCpy DATADIR EXEDIR Data Goto InitVarEnd CheckPortableDIR IfFileExists EXEDIR PNAME App APP PROGRAMEXE. CheckPortableAppsDIR StrCpy PROGRAMDIR EXEDIR PNAME App APP StrCpy dAtaDiR EXEDIR PNAME Data Goto InitVarEnd CheckPortableAppsDIR IfFileExists EXEDIR PortableApps PNAME App APP PROGRAMEXE. CheckAppsDIR StrCpy PROGRAMDIR EXEDIR PortableApps PNAME App APP StrCpy DATADIR EXEDIR PortableApps PNAME Data Goto InitVarEnd CheckAppsDIR IfFileExists EXEDIR Apps PNAME APP StrCpy PrOgRAMDIR EXEDIR Apps PnAmE APP StrCpy DaTADIR EXEDIR Data PNAME Goto InitVarEnd NoDIR Không tìm thấy cấu hình thư mục được cho phép nào MessageBox MB_OK MB_ICONEXCLAMATION PROGRAMEXE không tìm thấy. Xin kiểm tra cấu hình của bạn Abort kết thúc launcher InitVarEnd kết thúc hàm FunctionEnd Hàm Làm việc với các khóa hoặc cây registry backup restore delete Function DoAction StrCmp ACTIONPARAMETERS Sau vòng lặp nếu không có tham số nào thì thôi ngay StrCpy R8 0 reset bộ đếm StrCpy R2 ACTION 6 chỉ lấy 6 ký tự đầu của hành động đc yêu cầu StrCmp R2 Backup GoOn sao lưu thư mục yêu cầu IfFileExists ACTIONDIRECTORY . GoOn tạo thư mục sao lưu nếu nó không tồn tại CreateDirectory ACTIONDIRECTORY GoOn StrCpy R0 ACTIONPARAMETERS chép hằng số để làm việc đăng ký Loop ----------------------------------------------- Lấy tham số đơn ra khỏi danh sách ----------------------------------------------- StrCmp R0 Sau vòng lặp không phân tích registry khi không có khóa nào được đưa ra IntOp R8 R8 1 tăng bộ đếm WordFind R0 01 R9 .
