User:Whodares/WiiBASIC

WiiBASIC
General
Author(s)	WhoDares
Type	Utility
Version	0.1
Links
Download
Source
Peripherals

About

A BASIC system for the Wii, comprising of-

• A port of BSCRIPT, by Ariya Hidayat
• Extensions to support Wii devices/architecture
• A development IDE

Current Status

The port of BSCRIPT has been completed successfully. Once I add a simple menu/front end to load files, I'll release a demo.

Example

---

wiimote_ir(1)

print ""
print "Welcome to the WiiBASIC example"
print "-------------------------------"

wiimote_check
wiimote_irx(1)

while wiimote_btnheld(1, 128) = 0
 wiimote_check

 xloc = wiimote_irx(1) / 16
 yloc = wiimote_iry(1) / 16

 if xloc < 0 then
  xloc = 0
 endif

 if yloc < 0 then
  yloc = 0
 endif

 cursor(xloc, yloc)
 print "X"
wend

cls

for i = 1 to 28
 cursor(1, 3)
 print ""
 print right$("Thank you for using WiiBASIC", i)
 print right$("----------------------------", i)
 for r = 1 to 600
  l = 0
 next
next

for i = 1 to 1000
 l = 0
next