From 684f74cbb6e598447527186e52c3afd939d5195c Mon Sep 17 00:00:00 2001
From: Miteruzo <matuda.miteruzo@gmail.com>
Date: Sun, 4 Jun 2023 20:53:40 +0900
Subject: [PATCH] =?UTF-8?q?=E3=81=84=E3=82=8D=E3=81=84=E3=82=8D?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 .gitignore |   3 +++
 main.hsp   |  41 ++++++++++++++++++++++++++++++++++++++---
 obj        | Bin 3252 -> 4076 bytes
 3 files changed, 41 insertions(+), 3 deletions(-)
 create mode 100644 .gitignore

diff --git a/.gitignore b/.gitignore
new file mode 100644
index 0000000..56a22c4
--- /dev/null
+++ b/.gitignore
@@ -0,0 +1,3 @@
+/hscl.ini
+/obj
+
diff --git a/main.hsp b/main.hsp
index f02effd..20cc947 100644
--- a/main.hsp
+++ b/main.hsp
@@ -30,13 +30,48 @@
 
 	direction = 1
 
+	moving = False
+	falling = True
+
 	Repeat
-		Pos nizikaX, nizikaY
-		GCopy SCREEN_NIZIKA, 0, NIZIKA_HEIGHT * (frame \ 24), NIZIKA_WIDTH, NIZIKA_HEIGHT
+		If GetKey2 (KEY_MOUSE_L) {
+			If moving {
+				nizikaX = LimitF (mouseX - offsetX, -NIZIKA_LEFT, gInfo_dispX - NIZIKA_RIGHT)
+				nizikaY = LimitF (mouseY - offsetY, Null, gInfo_dispY - NIZIKA_BASE)
+			}
+			Else {
+				moving = True
+
+				offsetX = Double (mouseX - nizikaX)
+				offsetY = Double (mouseY - nizikaY)
+			}
+		}
+		Else: If moving {
+			moving = False
+			falling = True
+
+			fallVel = 0.
+		}
+		Else: If falling {
+			nizikaY = LimitF (nizikaY + fallVel, Null, gInfo_dispY - NIZIKA_BASE)
+			fallVel += 9.8
+
+			If nizikaY >= gInfo_dispY - NIZIKA_BASE {
+				falling = False
+			}
+		}
+
+		ReDraw False
+			Color COLOUR_LIME
+			BoxF
+
+			Pos nizikaX, nizikaY
+			GCopy SCREEN_NIZIKA, IIf (direction < 0, NIZIKA_WIDTH, 0), NIZIKA_HEIGHT * (frame \ 24), NIZIKA_WIDTH, NIZIKA_HEIGHT
+		ReDraw True
 
 		nizikaX += direction * 4
 
-		If nizikaX >= NIZIKA_WIDTH {
+		If (nizikaX >= gInfo_dispX - NIZIKA_RIGHT) || (nizikaX < -NIZIKA_LEFT) {
 			direction = -direction
 		}
 
diff --git a/obj b/obj
index d09be95b59e6c9948324bc6f2bffba4c8e491b81..3d621cb3c284c21ba62e413d5fd9772342760fd1 100644
GIT binary patch
literal 4076
zcmeHK&u<$=6n?wj_($x-jsi_lOV|<wghT<HBcQsa2o4dl8X<&K$vE*kS(@0EcN3CG
zNRbc+IQ9lNB)D-z;+g|jq>4WPRpOch$}y|;@_jSAu^n5`1DB$XHGVU1-jDCSdAol8
zV7<EfX-Z^DL{5t$9a2l=-h{}HrihUhvBA3mnoo-?Pm7eWe;f1>=ym8k1f?!VLJhrD
z_6GSyTO<QU9yBL#B1PK-HNY{%ig%_MI2XyvBp`^qij(KCUzD8v8W}QCNnu);6PRht
zjMC+qVdHD8?qaN)g*?1hCLcp*Db~qDzJNJ}IgMGo(9PKkkTJk3#XRf~6)_Y9$p!v?
z9M53CD3cYMWn9myy;U*As)(9AFWDLBq{Mo78bwhFQEDsToRC8q>zE!y(vVJT>8eCl
z6;`T-<m{_r;i{}^go$k1Z;D|P4N(yty&s!a<&i<pI=gdXmL5R%dB6jrDsKYi03F&g
zY~skGTE5cgkAID^7(g(1(vLTePyWI=ZwGgP*tA9Fi4i2$a~J#~yk-y?>tr8ziGg^v
z1#)j=os~YKuN5Nr1z&$#Cq&oJw9dRG=SoH+Nl+)+yvMvguiTWr?r0RO*O%cx!OvLe
zx1Sx2f*DKVrsctNdLx1)Dnst6i08mzY>911*!|oXc0t)mm41M<flTCWk(<!TL2fuA
z+Bc9tHU1?cZC4~!`bk;50!`Kx$Y7;j+++dX5>%|OYpO=Z)m_e>fe}3Al{Dn$u|^$N
zmJI`U%$vpgAf~j3y2JPA8MDE<<x@gk3!kgpVX{`24Ni@Nx53OOcC-xh^pZl-kLq$&
zASxiW;>zZYA%k(nDon>HDm;HCo^{sk4V>y2itt!Or1~9~k!`QjaGEQ1Pxd^g8!tV#
zDK&4i>o~2l)He2-O{dGn7I<aZa{T+wVOe(TZfgblN^`YL8y~H|cNeQWYishp<A3b7
z8tu>5+O4fyvhMh6^+TuYG&J{??|0peJ>T(oG$>j3JjeH5Z@EYA{rXC$wT0;P`0iVd
zg^Js#?7F_w-8*W_e!c6~H+GypN8_#$oy2QxOPbyKt|NML5Yt0xxLs${ciS!5ZST8q
z*R1dCkhYsmAUTNXq2lj5J5o!W*PH{_mriZ7-5NmDsrlW#0X&@=40=Nh4a;+noP$2@
zPMmSF4@cR%?Zy}zowhf|1h_*M^bL;q>$As5U-qXif7Ap^Vg#|09c$n+UL|=ME~;yD
zC|V!)&+_GCP{v%t{0y^$Cyld*^~LDnvEi`D<x6X5OjwfAPXgHmnO26?axz&C@Y9M%
zOYc(t|2G&Kf9amA(R)kb?cI5@U_V9sGz0%t2KWeEdb`<klae*1WT6{K%hVMTyuk7k
zFU(5{4LF+PEEs9Y&ZlLTJ(vaY^cxoXr|W1U(5qk@{!EDB3C)MUvxf-(K))s7DJ8-)
z{I8J^?P*#<lf6b*U>_LHva<`Xv9Apm*q??=?CGLll_;a&Hc4=o-DI%AzCG~RVFll?
zM+&}YKNI}IUM~2JR)arjH8`i$V8(>i;1v^AgLh0=4c1Nc_rbP__jm9Gx*Q1}AaIEy
zdifBOgFR3WT@VNVQ?Nf~mzkuk2Wj%zgYlmme_nL&hM$zkgnzB~A}IAJ%h8Kcs{f|m
z5+?PM-;`ctssEnzu^RJrkB5zf(G0%n;}cBU=Pl?FMzdJZ&Ne3QYUpeZd;0$plUNcx
z3sGV#=ZKZMq_msxNy#To_|)f~KK@A#$LjoX^v@z4B`M|4B8`wV+0#Gw^nVuVUma3?
Io>BSu8?V9cq5uE@

delta 728
zcmYjPJ!lj`7=7Q|?0Wy3)5Iidyp0C@yC$AZAm9n72wI$2o?rwKk}7?Kv$hF3f{lfC
zrj#6{6;aSGRj{_c=7Qa@H@@#y!CfA2zM1d$&5WAE#lhW&z4k@{I00Z-1-8j=3}Cr;
zi+no*&T;Pv`G8oc05h~NlfRNj<nLsS)$bomZcg+4zn`RetqQq>=+)p`K~iyjxtYW$
zqX2t23L(sNtlN{OMDB-N663~lap@&W=@Nv$?HNeQ4pD?<H<DVnY8L5z&s-bCfA<AR
zYB^ZMxQ0eSI=Vj3wP6kp*=dPrO)N0R61v|K1#{A7Zp1vv&$Q`0lSPXYRv~F#ZR+)c
zjR&~3s5Ym)f%PMzLFmx2>qj@-+i25lK6NW`cYim2EN8apr`czT>%@Jc%iLXY&0;^A
z&|G)R<s<i~bWm*50w(MG%jMt3y)VXQ(suK;m4S_Csa}bf!CnpG?43GhAGQB%sB>js
zz)3USl|^<4s*?Q#XAAz9x&}X1^3+4%8>*1MpxXE~RnGT>5&oIZ>7NUy@vnvI`#s?`
z`m3LX<^7SM0zVQ8<BdTLe%_!C-!e!Lg1(76ZneI1g{=jBMSNg*KokiTGXJu0k_#1O
n!;R~wN~gI}L3dm&*{vOi{9=@?`;g34qG|kbh){K(lCysRZESgY