QBasic convert to VB.NET or C#
QBasic convert to VB.NET or C#
(OP)
Hi guys!!! I trying to write some program and
I need to convert this code (for my project), is somebody can help me?
10 OPEN "COM1:9600, E, 7, 2, CS, DS, CD" as #1
20 PRINT #1,"P3";
30 N=240
40 H=95
50 IF N<=H THEN 90
60 PRINT #1,"F+" + STR$(H): N=N-H
70 PRINT #1,"F?": GOSUB 140: H=95-W
80 GOTO 50
90 PRINT #1,"F+" + STR$(H)
100 PRINT #1,"F?": GOSUB 140
110 IF W>0 THEN 100
120 PRINT #1,"R3";
130 END
140 IF LOC(1)=0 THEN 140 ELSE W$=INPUT$(LOC(1),#1)
150 W=ASC(W$)-32
160 RETURN
Thanks !!!
I need to convert this code (for my project), is somebody can help me?
10 OPEN "COM1:9600, E, 7, 2, CS, DS, CD" as #1
20 PRINT #1,"P3";
30 N=240
40 H=95
50 IF N<=H THEN 90
60 PRINT #1,"F+" + STR$(H): N=N-H
70 PRINT #1,"F?": GOSUB 140: H=95-W
80 GOTO 50
90 PRINT #1,"F+" + STR$(H)
100 PRINT #1,"F?": GOSUB 140
110 IF W>0 THEN 100
120 PRINT #1,"R3";
130 END
140 IF LOC(1)=0 THEN 140 ELSE W$=INPUT$(LOC(1),#1)
150 W=ASC(W$)-32
160 RETURN
Thanks !!!
RE: QBasic convert to VB.NET or C#
Add water (makes its own sauce).
RE: QBasic convert to VB.NET or C#
Yes, this is a part of school project. I have to write program for robot.
Most confuse me, and probably most important is line 140.
Could you help me , please?
RE: QBasic convert to VB.NET or C#
Add water (makes its own sauce).
RE: QBasic convert to VB.NET or C#
Anyway, thanks for your time :)