home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2002 February
/
Chip_2002-02_cd1.bin
/
sharewar
/
Slunec
/
app
/
sefikjd.exe
/
RCDATA
/
SCRIPT
Wrap
Text File
|
2001-12-17
|
923b
|
109 lines
MAIN
{
Dialog MAINDLG
}
MAINDLG:INIT
{
SetText $104,"%%D"
}
MAINDLG:$101
{
SetPath $104
SetText $113,"Extracting"
Mask "*.*"
Disable $101
Disable $102
Disable $103
Extract $114
EndDialog
}
MAINDLG:$102
{
Exit
}
MAINDLG:$103
{
BrowsePath "Select destination folder"
SetText $104,"%%D"
}
ASKVOLUME:INIT
{
SetText $104,"%%A"
}
ASKVOLUME:$101
{
SetArcName $104
EndDialog
}
ASKVOLUME:$102
{
Exit
}
ERRARCHIVE:INIT
{
SetText $113,"%%A"
}
ERRARCHIVE:$101
{
EndDialog
}
ERRARCHIVE:$102
{
Exit
}
ERRCREATE:INIT
{
SetText $113,"%%D%%F"
}
ERRCREATE:$101
{
EndDialog
}
ERRCREATE:$102
{
Exit
}
ERRCRC:INIT
{
SetText $113,"%%F"
}
ERRCRC:$101
{
EndDialog
}
ERRCRC:$102
{
Exit
}
ERRWRITE:$101
{
EndDialog
}
ERRWRITE:$102
{
Exit
}
ERRMEMORY:$101
{
Exit
}