DROS (DOS на твоём мобильнике)...
Это типа мобильного BASIC только урезанный и намного тормазнутый . Можно сравнить как будут схожие програмы работать на DROS и Mobile BASIC нужно в тектовой файл переименовать в bas и написать команду run имяфайла.bas
GRAPHICSMODE
X = 10
Y = 10
A = 1
B = 2
10
X = X + A
Y = Y + B
IF X > 75 THEN A=-A
IF X < 3 THEN A=-A
IF Y > 179 THEN B=-B
IF Y < 10 THEN B=-B
SETCOLOUR 255,255,255
CLS
DRAWBOX X,Y,20,20
FOR Z = 1 TO 20
W = Z * 10
FOR V = 1 TO 20
U = V * 10
DRAWBOX U,W,10,10
NEXT
NEXT
GOTO 10
EXIT
Для сравнения схожая програма на Mobile BASIC
10 X%=10
20 Y%=10
30 A%=1
40 B%=1
50 C%=0
60 X%=X%+A%
70 Y%=Y%+B%
80 IF X%>75 THEN A%=-A%
90 IF X%<3 THEN A%=-A%
100 IF Y%>179 THEN B%=-B%
110 IF Y%<10 THEN B%=-B%
120 CLS
130 SETCOLOR 0,0,0
140 DRAWRECT X%,Y%,20,20
150 FOR T%=1 TO 20
160 W%=T%*10
170 FOR U%=1 TO 20
180 V%=U%*10
190 DRAWRECT V%,W%,10,10
200 NEXT U%
210 NEXT T%
220 GOTO 60
Ссылка на пост
24 авг 2009 в 19:51