1. Куча / Говнокод #15797

    +142

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    // основная функция запуска
    func main($script){
        //устанавливаем значение переменной
        $caption = "гыыы кальулятор";
        
        //грузим иконку
    	$calc_icon= library_load_icon(library_load("shell32.dll"),307);
    	
    	//создаем окошко))
    	$main_window=gui_window("TCalc",$caption,$_WS_SYSMENU+$_WS_VISIBLE+$_WS_CAPTION,$_CW_DESKTOPCENTER,$_CW_DESKTOPCENTER,200,100,$calc_icon,0,0,"WindowFunc");
    	
    	gui_control($main_window,"button","ok",201,$_WS_CHILD+$_WS_VISIBLE+$_BS_DEFPUSHBUTTON+$_BS_FLAT,152,16,32,16);
    	gui_control($main_window,"edit","2+7",202,$_WS_CHILD+$_WS_VISIBLE,2,15,130,15);
    	gui_control($main_window,"static","Ready",203,$_WS_CHILD+$_WS_VISIBLE,16,36,130,16);
    	
    	//иконка в трее...
    	tray_icon($main_window,$calc_icon,"ГАЛЬГУЛЯТОР",$_NIM_ADD);
    	tray_icon_show_balloon($main_window,"[$caption] -> Startup","Добро пожаловать в программу\nСоздано с неизвестным языком (название не придумал)",4);
    	idle(); //перевод программы в режим ожидания
    }
    	 
    func WindowFunc($hwnd,$msg,$param,$id){ //обработка сообщений виндоуса
    	if($msg==$_WM_CLOSE){  //если крестик нажали
    		tray_icon($main_window,$calc_icon,null,$_NIM_DELETE);  //удаляем иконку
    		close();  //выходим
    	}
    	if($msg==$_WM_COMMAND){  //если нажали кнопку
    		if($id==201){ //click ok  //определяем ID   //math_compiler - производить математические операции
    			$res=math_compiler(gui_get($hwnd,202)); //gui_get - получить текст
    			if length($res)==0 {                    //gui_set - установить текст
    				$res="[ERROR]";
    				tray_icon_show_balloon($hwnd,"[$caption] -> Ашипка","Нивазможна\nправирить текст!",2);
    			}else{
    				tray_icon_show_balloon($hwnd,"[$caption] -> Result",gui_get($hwnd,202)." = $res",4);
    			}
    			gui_set($hwnd,203,$res);
    		}
    	}
    }

    Названия языка нет..

    Запостил: Mobac, 20 Апреля 2014

    Комментарии (12) RSS

    • Это же Visual PHP
      Ответить
    • > //создаем окошко))
      )))
      Ответить
      • какой багор ))
        Ответить
        • У меня к тебе чисто конкретный вопрос:

          А почему ты ещё не тимлид? Работать админом - это как-то жостка.
          Ответить
          • Потому, что глубоких знаний ни в чем нету, а за умение сконпелировать прогу/запачтить баг тимлидом не делают?
            Ответить
            • >Потому, что глубоких знаний ни в чем нету
              Га-га-га. Глубокий знаток s-a--m оценивает уровень познаний bormand a.
              Ответить
              • А что?
                Ответить
              • why not?
                Ответить
              • Судя по беспричинным плюсам моим оппонентам, рашкоблядям до сих пор печет.
                Ответить
                • > моим оппонентам
                  Сколько пафоса... Звучит так, как-будто тут в треде 10-20 оппонентов, бесперебойно наседающих на бедного sam'а. А на деле - оппонент всего один, да и написал он всего 1 коммент.

                  > рашкоблядям до сих пор печет
                  Причем здесь это? Тредом не промахнулся случаем?
                  Ответить
                  • В этом треде один.

                    Нет, не промахнулся. Таки печет, раз плюсуют.
                    Ответить
          • > А почему ты ещё не тимлид?
            Спихнуть начальника отдела и отобрать у него весь геморрой с бумажками и общением с партнерами/клиентами? :)

            Няхуй, няхуй... По крайней мере сейчас меня эта перспектива не особо радует.
            Ответить

    Добавить комментарий