Malay Basic ?

[aurel]

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
tamat

[johnno56]

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.

[luwal]

The software looks nice.