Read PSP ISO info.
// 读取PSPISO信息

Download: [download id="12"]
// 下载

/* What's new */
1.1 (2011-11-17)
    - Fix ISO cannot read in some .Net environment.

Read PSP ISO info.
// 读取PSPISO信息

Download: [download id="11"]
// 下载

Download: [download id="10"]
// 下载

 
Also there is a GIM viewer for Sony GIM graphic file.

// GIM viewer for normal GIM file

// GIM viewer for GIM with thumbs

// GIM viewer for GIM packed in GPDA(Guyzware's Packed Data Archive)

Simple tool to extract AFS pack for CRI ADX.
And it's only a preview version to extract files only.
Thank you for using.

Download: [download id="9"]
// 下载

public class aaaaaaa {
/**
     * 汉字转拼音缩写
     * @param str   //要转换的汉字字符串
     * @return String   //拼音缩写
     */
     public static String getPYString(String str)
     {
             String tempStr = "";
             for(int i=0; i<str.length(); i++) {
                     char c = str.charAt(i);
                     if((int)c >= 33 && (int)c <=126) {//字母和符号原样保留
                             tempStr += String.valueOf(c);
                     }
                     else {//累加拼音声母
                             tempStr += getPYChar( String.valueOf(c) );
                     }
             }
             return tempStr;
     }
     /**
     * 取单个字符的拼音声母
     * @param c   //要转换的单个汉字
     * @return String 拼音声母
     */
     public static String getPYChar(String c)
     {
             byte[] array = new byte[2];
             array = String.valueOf(c).getBytes();
             int i = (short)(array[0] - '\0' + 256) * 256 + ((short)(array[1] - '\0' + 256));
             if ( i < 0xB0A1) return "*";
             if ( i < 0xB0C5) return "a";
             if ( i < 0xB2C1) return "b";
             if ( i < 0xB4EE) return "c";
             if ( i < 0xB6EA) return "d";
             if ( i < 0xB7A2) return "e";
             if ( i < 0xB8C1) return "f";
             if ( i < 0xB9FE) return "g";
             if ( i < 0xBBF7) return "h";
             if ( i < 0xBFA6) return "j";
             if ( i < 0xC0AC) return "k";
             if ( i < 0xC2E8) return "l";
             if ( i < 0xC4C3) return "m";
             if ( i < 0xC5B6) return "n";
             if ( i < 0xC5BE) return "o";
             if ( i < 0xC6DA) return "p";
             if ( i < 0xC8BB) return "q";
             if ( i < 0xC8F6) return "r";
             if ( i < 0xCBFA) return "s";
             if ( i < 0xCDDA) return "t";
             if ( i < 0xCEF4) return "w";
             if ( i < 0xD1B9) return "x";
             if ( i < 0xD4D1) return "y";
             if ( i < 0xD7FA) return "z";
             return "*";
     }
    
     public static void main(String []g){
     System.out.println(getPYString("中国，,;$#@&avc"));
     }

}

0.5x

测试文件 0.2.0.3 alpha

TIM2@24bpp

测试文件 0.2.0.1 alpha

情不自禁唠叨一句...
TIM2@8bpp的Palette的存储顺序真是BT...

PS: 上图取自PS2 GAME: Ryu Koku JPN

[download id="3"]

0.1.1102.8
  - Clean source & Unify variables
0.1.1102.7
  - Using Invoke to free GUI when Open files
0.1.1102.6
  - Using Invoke to free GUI when Extract files
0.1.1102.4 2006-11-03
  - First alpha version

目录
一、如何拖动没有边框的窗体？
二、多个窗体之间互相调用

　　一、如何拖动没有边框的窗体？

　　这个功能在VB6中，需要借助于API函数才能实现。而在VB.NET中，凭自己的功能就能实现。首先设置窗体的FormBorderStyle属性为none以去掉窗体的边框，然后在窗体上添加一个按钮。窗体中的代码如下：

Public Class Form1
　Inherits System.Windows.Forms.Form

　Private mouse_offset As Point
　Private Sub form1_MouseDown(ByVal sender As Object, ByVal e As 　System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseDown
　　mouse_offset = New Point(e.X, e.Y)
　End Sub

Private Sub form1_MouseMove(ByVal Sender As System.Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseMove
　''按住鼠标左右键均可拖动窗体
　If e.Button = MouseButtons.Left Or e.Button = MouseButtons.Right Then
　　Dim mousePos As Point = Sender.findform().MousePosition
　　''获得鼠标偏移量
　　mousePos.Offset(-mouse_offset.X, -mouse_offset.Y)
　　''设置窗体随鼠标一起移动
　　Sender.findform().Location = mousePos
　End If
End Sub

Private Sub BtnExit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　''关闭窗体
　Me.Close()
End Sub
End Class

　　 二、多个窗体之间互相调用

　　在VB6中，多个窗体之间可以很方便地互相调用，如：在Form1中，只需要用一条“Form2.Show” 语句就能显示窗体Form2。然而在VB.NET中窗体处理机制发生了很大的变化：在访问窗体之前，你必须进行窗体实例化；如果在项目中有多处代码访问同一窗体，则你必须把它的同一实例指针传递给这些代码，否则新创建的窗体实例就不再是原先的窗体了。

　　下面的代码实现窗体Form1和Form2之间互相调用,Form1为主窗体。Form1上的按钮BtnShowFrm2的标题为“显示Form2”，Form2上的按钮BtnShowFrm1的标题为“显示Form1”。

　　1、Form1中的代码：

Public Class Form1
Inherits System.Windows.Forms.Form
''创建Form2的一个新的实例
Dim Frm2 As New Form2()

Public Function Instance2(ByVal frm As Form2)
Frm2 = frm
End Function

Private Sub BtnShowFrm2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnShowFrm2.Click
''以下语句保证在Form2以及其他窗体中访问Form1时，
''都将得到Form1的同一个窗体实例。
Frm2.Instance(Me)
Frm2.Show()
Me.Hide()
End Sub

End Class

　　2、Form2中的代码：

Public Class Form2
　Inherits System.Windows.Forms.Form
　Dim frm1 As Form1
　''借助一个新增的Instance属性来生成窗体frm1的实例
　Public Function Instance(ByVal frm As Form1)
　　frm1 = frm
　End Function

　Private Sub BtnShowFrm1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) 　　　Handles BtnShowFrm1.Click
　　Me.Hide()
　　frm1.Show()
　End Sub

　Private Sub Form2_Closed(ByVal sender As Object, ByVal e As System.EventArgs) Handles 　MyBase.Closed
　　''如果Form2被关闭，则设置Form1的按钮BtnShowFrm2不可用。
　　frm1.BtnShowFrm2.Enabled = False
　　frm1.Show()
　End Sub
End Class