Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

QBasic convert to VB.NET or C# 3

Status
Not open for further replies.
Serhiy79

Serhiy79

Programmer
Joined
Jun 9, 2014
Messages
3
Location
US
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 !!!
 
Sort by date Sort by votes
Portions of the code appear to be flawed. Is this a school project?

Add water (makes its own sauce).
 
Upvote 0 Downvote
Alt225
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?
 
Upvote 0 Downvote
I assume your teacher gave you the preceding code snippet so you could understand the underlying concepts. First, make a serious attempt to understand what the code is intended to accomplish (that includes line 140). Then start writing your project in VB.NET or C#. If you run into problems that you cannot solve, post your question in the VB.NET or C# forums and a member may help you find a solution (note: I did not say "GIVE you a solution"). Any more assistance from me, at this point, would inhibit the learning process. (Learning is methodical. You must accomplish each step using your own resources, intuition and intellect.) Good luck!

Add water (makes its own sauce).
 
Upvote 0 Downvote
I did research and got knowledge (QBasic). I believe, that I am on the right track.
Anyway, thanks for your time :)
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

pya
  • Locked
  • Question Question
QBASIC Processing time
Replies
14
Views
1K
mikrom
mikrom
pya
  • Locked
  • Question Question
Data Type Mismatch in QBASIC
Replies
7
Views
961
mikrom
mikrom
pya
  • Locked
  • Question Question
Travelling Salesman Problem in QBasic
Replies
14
Views
1K
mikrom
mikrom
Murugank
  • Locked
  • Question Question
Get source code from a QBasic exe
Replies
1
Views
786
mikrom
mikrom
Geates
  • Locked
  • Question Question
Access to QLB variables.
Replies
2
Views
650
Geates
Geates

Part and Inventory Search

Sponsor

Back
Top