home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Inter.Net 55-2
/
Inter.Net 55-2.iso
/
linux
/
speciale
/
xbasic
/
xb
/
html
/
intro9.gif
< prev
next >
Tile
Graphics Interchange Format
|
1999-06-04
|
15.6 KB
|
608x600
|
8-bit (33 colors)
ocr:
XBasic : Program Development Environment for Windows : v5.0004 - I L X File Edit View Option Run Debug Status Help EtlemD.. -UU MathCode rathCote F1 F2 F3 F4. F5 F6 F7 F8 F9 F10 F11 + F12 + Start FH Contin Pause I Kill YARN nil ASMI H (STOP) AAAAX PlotSIN AAAAX SUB PlotSIN ranges = "-2PI to +2PI" minimums =l "-1" maximums = "+1" comments = "SINC)" GOSUB DrawAxes XgrSetGridBoxScaled (graph, -$STWOPI, 1#, SSTWOPI, -1#) xt == -$STWOPI y# - SIN (x#) KgrMoveloScaled (graph, x#, y#) FOR x# = -$STWOPI TO $STWOPI STEP (S$PI/64#) y# - == SIN(X#) XgrDrawlineloscaled (graph, 5SYellow, x#, y#> NEXT x# END ...
