+- NaaLaa (https://www.naalaa.com/forum)
+-- Forum: Other (https://www.naalaa.com/forum/forum-8.html)
+--- Forum: Everything else (https://www.naalaa.com/forum/forum-10.html)
+--- Thread: Malay Basic ? (/thread-242.html)
Malay Basic ? - aurel - 05-12-2025
check this...
https://nvgamepad.itch.io/malaybasic
oups ..this one is removed from itch.io
author probably not happy...
https://www.malaybasic.com/
This one looks simple ...dropping apples
look at code :
Code:
Aplikasi "Buah",480,480,60,2,2
TunjukFPS
buah=sediagambar("apple.png")
PaksiXY(buah,lebar(buah)/2,tinggi(buah)/2)
kumpulan pos(x,y,nampak)
sedia biji@pos
biji.nampak=1
biji.x=100
biji.y=100
gerak = 0
bawah = 1
atas = 0
fungsi GelungUtama()
CuciSkrin()
jika Sentuh(0)
biji.x=SentuhX()
biji.y=SentuhY()
biji.nampak=1
gerak = 0
bawah = 1
atas = 0
BuangSentuhan()
dah
jika biji.nampak maka
buatGraviti()
gambar(buah,biji.x,biji.y)
'Bulat(biji.x,biji.y,20,1)
dah
tamat
fungsi buatGraviti()
jika biji.y+gerak < TinggiSkrin() dan bawah maka
biji.y = biji.y + gerak
gerak=gerak+1
kembali 0
tapi biji.y < TinggiSkrin() dan bawah maka
biji.y = TinggiSkrin() + 5
kembali 0
dah
bawah = 0
atas = 1
jika gerak < 0 dan biji.y > TinggiSkrin() maka
biji.nampak=0
dah
jika biji.y > 0 dan atas dan gerak >= 0 maka
biji.y = biji.y - gerak
gerak=gerak-1
jika gerak \ 3 = 0 maka gerak=gerak-1
kembali 0
dah
bawah = 1
atas = 0
tamatRE: Malay Basic ? - johnno56 - 05-12-2025
Thanks Aurel... Unfortunately, my ability to read and understand Malay, is somewhat non existent... Even though it is a Win32 app, it still ran... I couldn't understand anything but it did run... lol
Anyway, thanks for the info... much appreciated.
RE: Malay Basic ? - luwal - 05-13-2025
The software looks nice.
