Show_message_win, Мой скрипт, само проба Опции

[Kумчо Вълчо]

Това е една моя проба, която работи чрез VBS, и показва уиндоуски съобщения БЕЗ |)|_|_ .
Ето го и кода,има си обяснения.Работя на връщането. РЕДАКЦИЯ: ВЕЧЕ НЕ РАБОТЯ ПО СКРИПТА ВАОБЩЕ.

Код

/*
show_message_win - a sript for showing windows messages.
BY IVO GEORGIEV ('_')
Working on the returning!!!
argument0 = string to show
argument1 = message box caption
argument2 = buttons
0 = yes|no|cancel
1 = ok|cancel
2 = Yes|no
3 = Ok
argument3 = icons in the message
1 - red 'X'
2 - question
3 - warning
4 - info

EXAMPlE: show_message_win("Nice","Nice",2,2)
*/

{

   switch (argument2) {
       case 0:
       mesbuttons = "vbYesNoCancel"
       break;
       case 1:
       mesbuttons = "vbOkCancel"
       break;
       case 2:
       mesbuttons = "vbYesNo"
       break;
       case 3:
       mesbuttons = "vbOkOnly"
       break;
      
       }
   switch (argument3) {
       case 1:
       mesicon = "vbCritical"
       break;
       case 2:
       mesicon = "vbQuestion"
       break;
       case 3:
       mesicon = "vbExclamation"
       break;
       case 4:
       mesicon = "vbInformation"
       break;
   }
   exfile = "temp.vbs";
   exfile = file_text_open_write(exfile);
   file_text_write_string(exfile,"msgbox "+ '"' + argument0 + '"' + "," + mesicon + "+" + mesbuttons + "," + '"' + argument1 + '"');
   file_text_close(exfile);
   if execute_shell("temp.vbs",0) { return true; }
   if (file_exists(exfile)) then file_delete(exfile);

}

//end of my script

[Гост_Александър Витков_*]

По-скоро show_questation_win от колкото show_message_win

e,ако гледаме настройките от еxample