无忧启动论坛

 找回密码
 注册
搜索
一次装机 终生领工资最纯净的「微PE装机优盘」UEPON大师作品卡瑞飞系统和装机二合一超级U盘
诚聘PE工具开发技术员QQ:1607112133系统gho:最纯净好用系统下载站广告联系 QQ:184822951 微信:wuyouceo
查看: 14168|回复: 120

[分享] message制作工具---au3源码

    [复制链接]
发表于 2016-2-18 14:19:40 | 显示全部楼层 |阅读模式
message制作工具

20160218141123.jpg


  1. #Region ;**** 参数创建于 ACNWrapper_GUI ****
  2. #PRE_Icon=LOGO\message.ico
  3. #PRE_Outfile=message.exe
  4. #PRE_UseUpx=n
  5. #PRE_Res_Description=message制作工具1.2
  6. #PRE_Res_Fileversion=1.2.0.0
  7. #PRE_Res_LegalCopyright=@copyright 2010
  8. #PRE_Res_requestedExecutionLevel=None
  9. #PRE_Res_Field=CompanyName|www.60808.net
  10. #EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
  11. #include <ButtonConstants.au3>
  12. #include <ComboConstants.au3>
  13. #include <GUIConstantsEx.au3>
  14. #include <Process.au3>
  15. #include <ButtonConstants.au3>
  16. #include <GUIConstants.au3>
  17. #include <ProgressConstants.au3>
  18. #include <GDIPlus.au3>
  19. #include <StaticConstants.au3>
  20. #include <GuiComboBoxEx.au3>
  21. #include <GuiImageList.au3>
  22. #include <GuiConstantsEx.au3>
  23. #include <WindowsConstants.au3>
  24. #include <Misc.au3>
  25. #include <WinApiEx.au3>
  26. #include <File.au3>

  27. Opt("SendCapslockMode", 0)
  28. $Form1 = GUICreate("GfxMenu Message                                        by_年老痴呆", 640, 640, -1, -1)
  29. DirCreate (@TempDir & "\tmp")
  30. $tmp = @TempDir & "\tmp"
  31. FILEINSTALL ( "LOGO\back.jpg" , $tmp & "\back.jpg", 1 )
  32. $Pic = GUICtrlCreatePic($tmp & "\back.jpg", 0, 0, 640, 480)
  33. FILEINSTALL ( "LOGO\gfxboot.cfg",$tmp & "\gfxboot.cfg", 1 )
  34. Local $start_x,$start_y,$entries,$width,$normal,$select,$color,$width,$height,$Label,$bar,$s,$Labe0
  35. $Button1 = GUICtrlCreateButton("更改背景", 430, 565, 75, 22, 0)
  36. $Button2 = GUICtrlCreateButton("更改字体", 535, 565, 75, 22, 0)
  37. $Button3 = GUICtrlCreateButton("开始制作", 430, 595, 75, 22, 0)
  38. $Button4 = GUICtrlCreateButton("效果测试", 535, 595, 75, 22, 0)
  39. $C1= GUICtrlCreateLabel("设置菜单文本颜色",25, 534, 98, 22)
  40. $C2= GUICtrlCreateLabel("菜单文本选中颜色",223, 534, 98, 22)
  41. $C3= GUICtrlCreateLabel("菜单选中背景颜色",421, 534, 98, 22)
  42. $Combo1 = GUICtrlCreateCombo("", 123, 565,75, 20, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
  43. GUICtrlSetData(-1, "100|120|150|180|200|220|250|280|300|320|350|380|", "180")
  44. $Combo2 = GUICtrlCreateCombo("", 320, 565,75, 20, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
  45. GUICtrlSetData(-1, "50|100|120|150|180|200|220|250|280|300|320|", "120")
  46. $Labe2= GUICtrlCreateLabel("菜单条左起始位置",25, 568, 98, 22)
  47. $Labe3= GUICtrlCreateLabel("菜单条上起始位置",223, 568, 98, 22)
  48. $Labe4= GUICtrlCreateLabel("增加菜单容纳行数",25, 598, 98, 22)
  49. $Labe5= GUICtrlCreateLabel("设置菜单最小宽度",223, 598, 98, 22)
  50. $Combo3 = GUICtrlCreateCombo("", 123, 595,75, 20, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
  51. GUICtrlSetData(-1, "18|20|22|25|28|30|", "18")
  52. $Combo4 = GUICtrlCreateCombo("", 320, 595,75, 20, BitOR($CBS_DROPDOWN,$CBS_AUTOHSCROLL))
  53. GUICtrlSetData(-1, "200|220|250|280|300|320|350|380|420|", "420")
  54. Global $hGUI, $hImage, $hCombo1, $msg, $iMemo
  55. Global $Color[10] = ['0xFF9933', '0xFF00FF', '0xFF0000', '0xFFFF00', '0xFFFFFF', '0x00FFFF', '0x00FF66', '0x009900', '0x0000FF', '0x000000']
  56. $hCombo1 = _GUICtrlComboBoxEx_Create($Form1, "", 123, 530, 95, -1, $CBS_DROPDOWNLIST, $CBES_EX_NOSIZELIMIT)
  57.         GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
  58.         $hImage1 = _GUIImageList_Create(12, 12, 5, 3)
  59.         For $i = 0 To UBound($Color) - 1
  60.                 _GUIImageList_Add($hImage1, _GUICtrlComboBoxEx_CreateSolidBitMap($hCombo1, $Color[$i], 12, 12))
  61.         Next
  62.         _GUICtrlComboBoxEx_SetImageList($hCombo1, $hImage1)
  63.         For $x = 0 To UBound($Color) - 1
  64.                 _GUICtrlComboBoxEx_AddString($hCombo1, $Color[$x], $x, $x)
  65.         Next
  66.         _GUICtrlComboBoxEx_SetCurSel($hCombo1, 0)
  67. $hCombo2 = _GUICtrlComboBoxEx_Create($Form1, "", 320, 530, 95, -1, $CBS_DROPDOWNLIST, $CBES_EX_NOSIZELIMIT)
  68.         GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
  69.         $hImage2 = _GUIImageList_Create(12, 12, 5, 3)
  70.         For $i = 0 To UBound($Color) - 1
  71.                 _GUIImageList_Add($hImage2, _GUICtrlComboBoxEx_CreateSolidBitMap($hCombo2, $Color[$i], 12, 12))
  72.         Next
  73.         _GUICtrlComboBoxEx_SetImageList($hCombo2, $hImage2)
  74.         For $x = 0 To UBound($Color) - 1
  75.                 _GUICtrlComboBoxEx_AddString($hCombo2, $Color[$x], $x, $x)
  76.         Next
  77.         _GUICtrlComboBoxEx_SetCurSel($hCombo2, 0)
  78. $hCombo3 = _GUICtrlComboBoxEx_Create($Form1, "", 519, 530, 95, -1, $CBS_DROPDOWNLIST, $CBES_EX_NOSIZELIMIT)
  79.         GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
  80.         $hImage3 = _GUIImageList_Create(12, 12, 5, 3)
  81.         For $i = 0 To UBound($Color) - 1
  82.                 _GUIImageList_Add($hImage3, _GUICtrlComboBoxEx_CreateSolidBitMap($hCombo3, $Color[$i], 12, 12))
  83.         Next
  84.         _GUICtrlComboBoxEx_SetImageList($hCombo3, $hImage3)
  85.         For $x = 0 To UBound($Color) - 1
  86.                 _GUICtrlComboBoxEx_AddString($hCombo3, $Color[$x], $x, $x)
  87.         Next
  88.         _GUICtrlComboBoxEx_SetCurSel($hCombo3, 0)

  89. GUISetState(@SW_SHOW)
  90. _cfg()
  91. AdlibRegister('_HoverEffect',50)
  92. While 1

  93.         $nMsg = GUIGetMsg()
  94.         Select
  95.                Case $nMsg = $GUI_EVENT_CLOSE
  96.                        AdlibUnRegister('_HoverEffect')
  97.                        DirRemove($tmp, 1)
  98.                         Exit
  99.                Case $nMsg = $Button1
  100.                         $Search = FileOpenDialog("请选择程序名","","图像文件 (*.jpg;*.bmp)", 1 + 4)

  101.                         $Imag = $Search
  102.                                 _GDIPlus_Startup()
  103.                         $hImage = _GDIPlus_ImageLoadFromFile($Imag)
  104.                         $Imagew = _GDIPlus_ImageGetWidth($hImage)
  105.                                 $Imageh = _GDIPlus_ImageGetHeight($hImage)
  106.                                 _GDIPlus_ImageDispose($hImage)
  107.                                 _GDIPlus_Shutdown()

  108.                         IF $Imagew&" "&$Imageh == "800 600" OR $Imagew &" "&$Imageh = "1024 768" THEN
  109.                                _Pic2jpg($Imag, $tmp & "\back.jpg", 90) ;质量90
  110.                                  IniWrite($tmp & "\gfxboot.cfg", "Config", "custom_width", $Imagew)
  111.                                  IniWrite($tmp & "\gfxboot.cfg", "Config", "custom_height" ,$Imageh)

  112.                                        _cfg()

  113.                         ELSE
  114.                            MSGBOX (0 , "非标准图片" ,"请选择1024x768或800x600图片 |*.jpg|*.bmp|")
  115.                         ENDIF
  116.                Case $nMsg = $Button2
  117.                         Local $a_font
  118.                         $a_font = _ChooseFont("Arial", 8)
  119.                         
  120.                              If (@error) Then
  121.                              Else
  122.                                  $entries = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" ,"menu_max_entries" , "" )   ;菜单条数
  123.                                  $height = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "custom_height" , "" )   ;高
  124.                                  $start_y = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "menu_start_y" , "" ) ;纵向起始                                      
  125.                                   If  INT(($a_font[3]+4)*$entries)>INT($height-$start_y-50) then
  126.                                         $ent =INT(($height-$start_y-100)/($a_font[3]+6))
  127.                                         MSGBOX (0 , "字体设置过大","目前可以容纳"& $ent&"条菜单,"&@LF& _
  128.                                                 "如果你确定你的菜单少于"& $ent &"条"&@LF& _
  129.                                                 "你可以使用这个设置,"&@LF& _
  130.                                                 "否则请重新设置," )      
  131.                                    EndIf
  132.                                          IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_font", $a_font[2])
  133.                                          IniWrite($tmp & "\gfxboot.cfg", "Config", "font_size" ,$a_font[3])
  134.                         GUICtrlSetData($Label, "")
  135.                         GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
  136.                                                  _cfg()   
  137.                              EndIf
  138.                                       
  139.                Case $nMsg = $Button3
  140.                                 DirCreate (@TempDir & "\tmp\Msgtmp")
  141.                                 DIM $DIYMSG = @TempDir & "\tmp\Msgtmp"
  142.                                         _msg()
  143.                     MSGBOX (0 , "制作完成!" ,"“message”文件已拷贝在当前目录。" & @LF& _
  144.                                 "你可以进行模拟效果测试了!")

  145.                Case $nMsg = $Button4
  146.                                  _Amvm()
  147.                Case $nMsg = $Combo1
  148.                         $b1 = GUICtrlRead($Combo1)
  149.                         IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_start_x", $b1)
  150.                         GUICtrlSetData($Label, "")
  151.                         GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
  152.                                        _cfg()
  153.                Case $nMsg = $Combo2
  154.                         $b2 = GUICtrlRead($Combo2)
  155.                         IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_start_y", $b2)
  156.                         GUICtrlSetData($Label, "")
  157.                         GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
  158.                                        _cfg()
  159.                Case $nMsg = $Combo3
  160.                         $b3 = GUICtrlRead($Combo3)
  161.                         $height = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "custom_height" , "" )   ;高
  162.                         $start_y = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "menu_start_y" , "" ) ;纵向起始
  163.                         $MFSIZE = INIREAD ($tmp & "\gfxboot.cfg", "Config", "font_size" ,"")
  164.                         if INT(($MFSIZE+4)*$b3)<INT($height-$start_y-100) then
  165.                            IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_max_entries", $b3)
  166.                         GUICtrlSetData($Label, "")
  167.                         GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
  168.                                        _cfg()
  169.                         else
  170.                           MSGBOX (0 , "提示!" ,"目前已经容纳不下"& $b3&"条菜单,"&@LF& _
  171.                                                 "解决办法:"&@LF& _
  172.                                                 "1 、把菜单条起始位置向上移动,"&@LF& _
  173.                                                 "2 、把菜单条字体减小。")
  174.                         endif
  175.                Case $nMsg = $Combo4
  176.                         $b4 = GUICtrlRead($Combo4)
  177.                         IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_bar_min_width", $b4)
  178.                         GUICtrlSetData($Label, "")
  179.                         GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
  180.                                        _cfg()

  181.      EndSelect
  182. WEnd
  183. Func _msg()
  184. DIM $DIYMSG = @TempDir & "\tmp\Msgtmp"
  185. FILEINSTALL ( "LOGO\cpio.exe" , $DIYMSG & "\cpio.exe" )
  186. FILEINSTALL ( "LOGO\msg", $DIYMSG & "\msg", 1 )  
  187. FILEINSTALL ( "LOGO\mkblfont.exe" , $DIYMSG & "\mkblfont.exe", 1 )
  188. FILEINSTALL ( "LOGO\chs.txt" , $DIYMSG & "\chs.txt", 1 )
  189. FILEINSTALL ( "LOGO\libintl3.dll" , $DIYMSG & "\libintl3.dll", 1 )
  190. FILEINSTALL ( "LOGO\libiconv2.dll" , $DIYMSG & "\libiconv2.dll", 1 )
  191. RUNWAIT ( @COMSPEC & " /c cpio.exe -t <msg>list.txt&&cpio.exe -i <msg" , $DIYMSG , 0 )
  192. FileCopy($tmp & "\gfxboot.cfg",$DIYMSG &'\gfxboot.cfg',1)
  193. FileCopy($tmp & "\back.jpg",$DIYMSG &'\back.jpg',1)
  194. $mfont = INIREAD ( $DIYMSG & "\gfxboot.cfg" , "Config" ,"menu_font","")
  195. $MFSIZE = INIREAD ($DIYMSG & "\gfxboot.cfg", "Config", "font_size" ,"")
  196. If $mfont <> "Arial" or $MFSIZE <> "16" Then
  197. $csidl_fonts = "20"
  198. local $fontslist = _filelisttoarray ( _winapi_shellgetspecialfolderpath ( $csidl_fonts ) , "*.*" , 1 )
  199. if not @error then
  200.         for $i = 1 to $fontslist [ 0 ]
  201.                      local $fontsname = _winapi_getfontresourceinfo ( $fontslist [ $i ] , 1 ) , $fname
  202.                      local $extension = stringright ( $fontslist [ $i ] , 4 )
  203.                  if $extension = ".ttc" then
  204.                          local $array = stringsplit ( $fontsname , " & " , 1 )
  205.                       for $j = 1 to $array [ 0 ]
  206.                               if $array [ $j ] = $mfont then
  207.                                   $fname = $fontslist [ $i ]
  208.                                          exitloop
  209.                                 endif
  210.                        next
  211.                  elseif $extension = ".ttf" or $extension = ".fon" then
  212.                        if $fontsname = $mfont then $fname = $fontslist [ $i ]
  213.                  endif
  214.         next
  215. endif
  216. LOCAL $OPT1 = "-a 0x20-0x7e,0xa0-0xbf,0xc1-0xcb,0xcd-0xce,0xd0-0xd1,0xd3-0xd8,0xda-0xff "
  217. LOCAL $OPT2 = ":prop=2:space_width=4:size=" & INT ( $MFSIZE) & ":bold=1:nobitmap=1:autohint=1 "
  218. RUNWAIT ( @COMSPEC & " /c mkblfont.exe -v -l 18 " & $OPT1 & "-t chs.txt -f " & $fname & $OPT2 & "16x16.fnt>nul" , $DIYMSG, 0 )
  219. EndIf
  220. RUNWAIT ( @COMSPEC & " /c cpio.exe -o <list.txt>..\msg.back", $DIYMSG , 0 )
  221. FileCopy($tmp & "\msg.back",@ScriptDir &'\message')
  222. DirRemove($DIYMSG, 1)
  223. EndFunc

  224. Func _cfg()
  225. $start_x = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "menu_start_x" , "" ) ;横向起始
  226. $start_y = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "menu_start_y" , "" ) ;纵向起始
  227. $entries = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" ,"menu_max_entries" , "" )   ;菜单条数
  228. $mwidth = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" ,"menu_bar_min_width" , "" )   ;菜单宽度
  229. $normal = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "menu_text_normal" , "" ) ;菜单色
  230. $select = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "menu_text_select" , "" ) ;选中色
  231. $bar = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "menu_bar_color" , "" )     ;选中背景色
  232. $width = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "custom_width" , "" )     ;宽
  233. $height = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" , "custom_height" , "" )   ;高
  234. $font = INIREAD ( $tmp & "\gfxboot.cfg" , "Config" ,"menu_font","")
  235. $MFSIZE = INIREAD ($tmp & "\gfxboot.cfg", "Config", "font_size" ,"")
  236. GUICtrlSetImage($Pic,$tmp & "\back.jpg")
  237. if $width = "1024" then
  238.       $wh = "0.6"
  239.       $z = "6"
  240. else
  241.       $wh = "0.78"
  242.       $z = "6"
  243. endif
  244. $X = INT($start_x*$wh)
  245. $Y = INT($start_y*$wh)
  246. $w = INT($mwidth*$wh)
  247. $F = INT($MFSIZE*$wh)
  248. $M =$F+$z
  249. $Label = GUICtrlCreateLabel("测试菜单起始位置及颜色效果",$x, $y, $w, $M)
  250. GUICtrlSetColor($Label,$normal)
  251. GUICtrlSetFont($Label, $F, 400, 0, $font)
  252. GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
  253. GUICtrlSetData($Labe0, "")
  254. $Labe0 = GUICtrlCreateLabel("现在你看到的是"&$width&"x"&$height&"缩小到640x480时的效果",35, 490, 550, 40)
  255. GUICtrlSetFont($Labe0, 18, 800, 0, "Arial")
  256. EndFunc
  257. Func _HoverEffect()
  258.         $aInfo = GUIGetCursorInfo($Form1)
  259.         Switch $aInfo[4]

  260.                 Case $Label
  261.                         If $S = True Then
  262.                                 GUICtrlSetColor($Label, $select)
  263.                                 GUICtrlSetBkColor($Label,$bar)
  264.                                 $S = False
  265.                         EndIf
  266.                 Case Else
  267.                         If $S = False Then
  268.                                 GUICtrlSetColor($Label, $normal)
  269.                                 GUICtrlSetBkColor($Label, $GUI_BKCOLOR_TRANSPARENT)
  270.                                 $S = True
  271.                         EndIf

  272.         EndSwitch
  273. EndFunc
  274. Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
  275.         #forceref $hWnd, $iMsg
  276.         Local $hWndFrom, $iCode, $Count, $sText
  277.         $hWndFrom = $ilParam
  278.         $iCode = BitShift($iwParam, 16)
  279.         Switch $hWndFrom
  280.                 Case $hCombo1
  281.                         Switch $iCode
  282.                                 Case $CBN_SELCHANGE
  283.                                      $Count = _GUICtrlComboBoxEx_GetCurSel($hCombo1)
  284.                                      _GUICtrlComboBoxEx_GetItemText ($hCombo1, $Count, $sText)
  285.                                      IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_text_normal", $sText)
  286.                                          _cfg()
  287.                          EndSwitch
  288.                 Case $hCombo2
  289.                         Switch $iCode
  290.                                 Case $CBN_SELCHANGE
  291.                                      $Count = _GUICtrlComboBoxEx_GetCurSel($hCombo2)
  292.                                      _GUICtrlComboBoxEx_GetItemText ($hCombo2, $Count, $sText)
  293.                                      IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_text_select", $sText)
  294.                                                  _cfg()
  295.                         EndSwitch
  296.                 Case $hCombo3
  297.                         Switch $iCode
  298.                                 Case $CBN_SELCHANGE
  299.                                      $Count = _GUICtrlComboBoxEx_GetCurSel($hCombo3)
  300.                                      _GUICtrlComboBoxEx_GetItemText ($hCombo3, $Count, $sText)
  301.                                      IniWrite($tmp & "\gfxboot.cfg", "Config", "menu_bar_color", $sText)
  302.                                                _cfg()
  303.                         EndSwitch
  304.         EndSwitch
  305.         Return $GUI_RUNDEFMSG
  306. EndFunc   ;==>WM_COMMAND
  307. FUNC _PIC2JPG ( $SFILENAME , $OFILENAME , $IQUALITY = 100 )
  308. _GDIPLUS_STARTUP ( )
  309. LOCAL $HIMAGE = _GDIPLUS_IMAGELOADFROMFILE ( $SFILENAME )
  310. LOCAL $GIQUALITY = $IQUALITY , $PPARAMS
  311. LOCAL $TPARAMS = _GDIPLUS_PARAMINIT ( 1 )
  312. LOCAL $TDATA = DLLSTRUCTCREATE ( "int Quality" )
  313. DLLSTRUCTSETDATA ( $TDATA , "Quality" , $GIQUALITY )
  314. _GDIPLUS_PARAMADD ( $TPARAMS , $GDIP_EPGQUALITY , 1 , $GDIP_EPTLONG , DLLSTRUCTGETPTR ( $TDATA ) )
  315. IF ISDLLSTRUCT ( $TPARAMS ) THEN $PPARAMS = DLLSTRUCTGETPTR ( $TPARAMS )
  316. LOCAL $CLSID = _GDIPLUS_ENCODERSGETCLSID ( "JPG" )
  317. LOCAL $SAVE = _GDIPLUS_IMAGESAVETOFILEEX ( $HIMAGE , $OFILENAME , $CLSID , $PPARAMS )
  318. _GDIPLUS_BITMAPDISPOSE ( $HIMAGE )
  319. _GDIPLUS_SHUTDOWN ( )
  320. IF $SAVE = FALSE THEN RETURN SETERROR ( 1 , 0 , FALSE )
  321. RETURN TRUE
  322. ENDFUNC
  323. FUNC _Amvm()
  324. if FileExists($tmp & "\msg.back") Then
  325.    DirCreate ($tmp& "\boot")
  326.    $boot = $tmp& "\boot"
  327.    FileCopy($tmp & "\msg.back",@ScriptDir &'\message')
  328.    FILEINSTALL ( "boot\qemu.dll" , $tmp & "", 1 )
  329.    FILEINSTALL ( "boot\mkisofs.dll" , $tmp & "", 1 )
  330.    FILEINSTALL ( "boot\grldr" , $boot & "", 1 )
  331.    FileCopy($tmp & "\msg.back",$boot &'\message', 1 )
  332. RUN ( @COMSPEC & " /c mkisofs.dll -R -b grldr -no-emul-boot -boot-load-size 4 -o  MsgPrvw.ISO boot ",$tmp,"")
  333. RUN ( @COMSPEC & " /c qemu.dll -L . -m 16 -localtime -boot d -cdrom MsgPrvw.ISO ",$tmp,"")
  334. Else
  335.        MSGBOX (0 , "测试失败!" ,"你还没有制作个性message背景")
  336. EndIf
  337. ENDFUNC
复制代码


成品:

message.part1.rar (1.9 MB, 下载次数: 1948)

评分

参与人数 6无忧币 +30 收起 理由
+ 5 神马都是浮云
lookerJ + 5 很给力!
oliver1997 + 5 很不错!赞!
ra25671123 + 5 赞一个!
freesoft00 + 5
2012duanyongli + 5 给大师点赞

查看全部评分

发表于 2016-2-18 14:54:44 | 显示全部楼层
333333333333333
回复

使用道具 举报

发表于 2016-2-18 15:05:27 | 显示全部楼层
源代码的206行
$csidl_fonts = "20"
其中的 变量$csidl_fonts在不同的autoit版本可能会有冲突,建议修改一下。
回复

使用道具 举报

发表于 2016-2-18 15:13:48 | 显示全部楼层
必须支持一下
回复

使用道具 举报

发表于 2016-2-18 15:16:57 | 显示全部楼层
很方便制作message,收藏。
回复

使用道具 举报

发表于 2016-2-18 15:20:21 | 显示全部楼层
赞一个。。
回复

使用道具 举报

发表于 2016-2-18 15:24:58 | 显示全部楼层
好东西,下载看看,谢谢!
回复

使用道具 举报

发表于 2016-2-18 16:07:53 | 显示全部楼层
感謝分享~message制作工具---au3源码
回复

使用道具 举报

发表于 2016-2-18 16:08:26 | 显示全部楼层
支持一下
回复

使用道具 举报

发表于 2016-2-18 16:09:51 | 显示全部楼层
非常好的东西!!收藏了
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

小黑屋|手机版|Archiver|捐助支持本站|无忧启动 ( 闽ICP备05002490号-1 )

闽公网安备 35020302032614号

GMT+8, 2019-4-24 20:38

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回复 返回顶部 返回列表