20 lines
171 B
Text
20 lines
171 B
Text
if a then b=c else b=d
|
|
|
|
if a=0
|
|
b=c
|
|
elseif a<0
|
|
b=d
|
|
else
|
|
b=e
|
|
end if
|
|
|
|
select case a
|
|
case 'A'
|
|
v=21
|
|
case 'B'
|
|
v=22
|
|
case 1 to 64
|
|
v=a+300
|
|
case else
|
|
v=0
|
|
end select
|