jz5

initial begin
    int fd, ret;
    string line;
    int type_no, size;

    bit [31:0] addr;
    bit [7:0] data []; // dynamic array

    fd = $fopen("./hexfile", "r");

jz5

Dim webBmp As Bitmap
Using wc = New WebClient
    webBmp = New Bitmap(wc.OpenRead(url))
End Using

jz5

Dim wallBmp = New Bitmap(System.IO.Path.Combine(Server.MapPath("./"), "wallpaper.png"))

jz5

Response.ContentType = "image/png"
Response.Flush()
outBmp.Save(Response.OutputStream, Imaging.ImageFormat.Png)
Response.End()

jz5

Dim dst = New Rectangle(754, 18, 1110, 807) ' 描画先の位置・大きさ
Dim src = New Rectangle(0, 0, webBmp.Width, webBmp.Height) ' 参照画像の位置・大きさ

If dst.Width / dst.Height < webBmp.Width / webBmp.Height Then
    Dim w = dst.Width / (dst.Height / webBmp.Height)
    src.X = Convert.ToInt32((webBmp.Width - w) / 2)
    src.Width = Convert.ToInt32(w)
Else
    Dim h = dst.Height / (dst.Width / webBmp.Width)
    src.Y = Convert.ToInt32((webBmp.Height - h) / 2)

jz5

<%@ Page Language="vb" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="GeneratorWebForm" %>

jz5

Dim q = Context.Request.QueryString.Get("q")
If Not Uri.IsWellFormedUriString(q, UriKind.Absolute) Then
    Exit Sub
End If
Dim url = New Uri(q)

jz5

.panel {
    background: url('http://pronama.azurewebsites.net/chrome/sd_eye0.png') no-repeat;
    background-size: contain;
    background-position: 10px -5px;
}

jz5

<?xml version="1.0" encoding="UTF-8" ?>
<configuration>
    <system.webServer>
        <staticContent>
            <remove fileExtension=".svg" />
            <mimeMap fileExtension=".svg" mimeType="image/svg+xml" />
        </staticContent>
    </system.webServer>
</configuration>

jz5

AddType image/svg+xml svg