Skip to content
Projects
Groups
Snippets
Help
Loading...
Help
Support
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
M
mycard
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Security & Compliance
Security & Compliance
Dependency List
License Compliance
Packages
Packages
List
Container Registry
Analytics
Analytics
CI / CD
Code Review
Insights
Issues
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
syntax_j
mycard
Commits
4c6bbc68
Commit
4c6bbc68
authored
Sep 14, 2013
by
神楽坂玲奈
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
icon
parent
8c1171c8
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
18 additions
and
11 deletions
+18
-11
README.md
README.md
+8
-1
main.rb
main.rb
+10
-10
No files found.
README.md
View file @
4c6bbc68
mkexy --encoding=utf-8 main.rb
exerb -c gui -k utf8 main.exy
upx main.exe
\ No newline at end of file
upx main.exe
resource:
icon:
-
width: 256
height: 256
color: 32
file : icon.ico
main.rb
View file @
4c6bbc68
...
...
@@ -41,7 +41,7 @@ begin
Config
[
'ygopro'
][
'numfont'
]
=
Config
[
'ygopro'
][
'numfont'
].
find
{
|
path
|
File
.
file?
path
}
if
Config
[
'ygopro'
][
'numfont'
].
is_a?
Enumerable
if
!
Config
[
'ygopro'
][
'path'
]
if
!
Config
[
'ygopro'
][
'path'
]
or
!
File
.
file?
Config
[
'ygopro'
][
'path'
]
require
'win32api'
GetOpenFileName
=
Win32API
.
new
(
"comdlg32.dll"
,
"GetOpenFileNameW"
,
"p"
,
"i"
)
...
...
@@ -84,16 +84,16 @@ begin
0
,
# lpfnHook L
0
# lpTemplateName L
].
pack
(
"LLLPLLLPLPLPPLS2L4"
)
Dir
.
chdir
(
'.'
)
{
Dir
.
chdir
(
'.'
)
do
GetOpenFileName
.
call
(
ofn
)
}
szFile
.
delete!
(
"
\0
"
.
encode
(
"UTF-16LE"
)
)
result
=
szFile
.
encode
(
"UTF-8"
)
result
=
File
.
expand_path
result
if
result
Config
[
'ygopro'
][
'path'
]
=
result
else
e
xit
result
=
szFile
.
delete
(
"
\0
"
.
encode
(
Encoding
::
UTF_16LE
)).
encode
(
Encoding
::
UTF_8
)
if
!
result
.
empty?
and
File
.
file?
result
result
=
File
.
expand_path
result
Config
[
'ygopro'
][
'path'
]
=
result
else
exit
e
nd
end
end
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment