No one has voted on any posts yet. Votes from other community members are used to determine a member's reputation amongst their peers.
7 Posted Topics
 | Just add a readkey and it will wait until you press a key =/ |
| | |
 | Well i didnt really know where to post this =(, if you think its wrongly placed just move it =P I don't know if other Pascal versions show each code error, but FPC doesn't. If you got one this encouragement killer errors use Ctrl+F with your error code number. 001: …  |
| | OK i'm trying to make a program that saves the records in a file... this is what i got so far and isn't working.. Thanks in advance [CODE]Program AccManager; uses crt; Type T_Account= record User:string[16]; Password:string[12]; Rango:byte; END; Arc_acc= file of T_Account; var Acc:T_Account; option:byte; l,m:integer; Acu:Arc_acc; {**********Preparar o Crear … |
| | The ball (asterisk) wont move =/ [CODE]{*** Made by Code4fun ***} Program DamnBall; Uses crt; const ANP = 79; ALP = 24; MIN=1; ALT=3; ANC=4; Time=100; Var PosX,PosY,Dx,Dy:integer; Procedure DP(pX,pY:integer); {this draws the ball (asterisk)} BEGIN Gotoxy (pX,pY); write('*'); Delay (kk); Gotoxy (pX,pY); write(' '); END; Procedure VP(pX,pY,dirx,diry:integer); {this makes … |
| | InitVel := speed * cos([COLOR="Red"]speed[/COLOR]);<---- i think you have to change it for: InitVel :=speed * cos([COLOR="Green"]angle[/COLOR]); you can change how the numbers sho by adding example writeln(a:8:2); lets say you have a:= 100.05 normally it would show 100.050000000000 or something like that with writeln(a:8:2); it shows 100.05 with writeln(a:8:4); … |
| | Ok, this Program was supposed to make the [U]asterisk go down a line every 1 second[/U] and to be able to move right and left, It moves right and left but [U]it doesn't go down.[/U] For Those wondering, yeah im trying to make an arkanoid or something like that... this … |
The End.