|
- #include "user32.as"
-
- #packopt hide 1
- #packopt name "nizika-desktop"
-
- #const NIZIKA_WIDTH 300
- #const NIZIKA_HEIGHT 300
- #const NIZIKA_BASE 240
- #const NIZIKA_LEFT 60
- #const NIZIKA_RIGHT 250
-
-
- ; 半透明スクリーン作成
- SCREEN_MAIN = BgScr2 (gInfo_dispX, gInfo_dispY, SCREEN_HIDE, 0, 0)
- SetWindowLong hWnd, GWL_EXSTYLE, GetWindowLong (hWnd, GWL_EXSTYLE) Or WS_EX_LAYERED
- SetLayeredWindowAttributes hWnd, RGBCOLOUR_LIME, False, True
-
- Color COLOUR_LIME
- BoxF
-
- SCREEN_NIZIKA = Buffer2 ()
- PicLoad "assets/nizika.png"
-
- GSel SCREEN_MAIN, 2
-
- frame = 0
-
- nizikaX = Double (-NIZIKA_LEFT)
- nizikaY = Double (gInfo_dispY - NIZIKA_BASE)
-
- direction = 1
-
- Repeat
- Pos nizikaX, nizikaY
- GCopy SCREEN_NIZIKA, 0, NIZIKA_HEIGHT * (frame \ 24), NIZIKA_WIDTH, NIZIKA_HEIGHT
-
- nizikaX += direction * 4
-
- If nizikaX >= NIZIKA_WIDTH {
- direction = -direction
- }
-
- Await 33
-
- frame++
- Loop
|