MATLAB® is a high-level language and interactive environment for numerical computation, visualization, and programming. Using MATLAB, you can analyze data, develop algorithms, and create models and applications. The language, tools, and built-in math functions enable you to explore multiple approaches and reach a solution faster than with spreadsheets or traditional programming languages, such as C/C++ or Java™.
' {$STAMP BS2}
' {$PBASIC 2.5}
'Security Code Project
'Username: 12345
'Password: 24680
Username VAR Word
Password VAR Word
Right VAR Word
Options VAR Byte
newpass VAR Word
password = 24680
Logout VAR Byte
top:
DEBUG "Please enter your user number"
DEBUGIN DEC Username
DEBUG "please enter your password"
DEBUGIN DEC Password
IF username = 12345 AND password = 24680 THEN
Right = 1
ELSEIF username <> 12345 OR password <> 24680 THEN
Right = 0
ENDIF
IF right = 1 THEN
DEBUG "Authorization Granted! " ,CR
DEBUG "Please Select an option:" ,CR
DEBUG "Select 1 to change your password" ,CR
DEBUG "Select 2 to logout" ,CR
ELSEIF right = 0 THEN
DEBUG "Incorrect username of password, please try again!"
ENDIF
DEBUGIN DEC Options
IF options = 1 THEN
DEBUG "Please enter your new password" ,CR
DEBUGIN DEC newpass
IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR
GOTO newpassprogram:
ENDIF
IF options = 2 THEN
DEBUG "Good Bye!" ,CR
PAUSE 200
DEBUG "You have succesfully logged out!" ,CR
GOTO top
ENDIF
newpassprogram:
DEBUG "Please enter your user number"
DEBUGIN DEC Username
DEBUG "please enter your password"
DEBUGIN DEC Password
IF username = 12345 AND 0>password<1000 THEN
Right = 1
ELSEIF username <> 12345 OR password <> 24680 THEN
Right = 0
ENDIF
IF right = 1 THEN
DEBUG "Authorization Granted! " ,CR
DEBUG "Please Select an option:" ,CR
DEBUG "Select 1 to change your password" ,CR
DEBUG "Select 2 to logout" ,CR
ELSEIF right = 0 THEN
DEBUG "Incorrect username of password, please try again!"
ENDIF
DEBUGIN DEC Options
IF options = 1 THEN
DEBUG "Please enter your new password" ,CR
DEBUGIN DEC newpass
IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR
GOTO newpassprogram:
ENDIF
IF options = 2 THEN
DEBUG "Good Bye!" ,CR
PAUSE 200
DEBUG "You have succesfully logged out!" ,CR
GOTO top:
ENDIF
Pro said:This reminds me of Basic Stamp Editor...we used it to code controls for systems and robots (boe-bots technically).
This is a simple password debug terminal I coded in bs2 (BSE)
Code:' {$STAMP BS2} ' {$PBASIC 2.5} 'Security Code Project 'Username: 12345 'Password: 24680 Username VAR Word Password VAR Word Right VAR Word Options VAR Byte newpass VAR Word password = 24680 Logout VAR Byte top: DEBUG "Please enter your user number" DEBUGIN DEC Username DEBUG "please enter your password" DEBUGIN DEC Password IF username = 12345 AND password = 24680 THEN Right = 1 ELSEIF username <> 12345 OR password <> 24680 THEN Right = 0 ENDIF IF right = 1 THEN DEBUG "Authorization Granted! " ,CR DEBUG "Please Select an option:" ,CR DEBUG "Select 1 to change your password" ,CR DEBUG "Select 2 to logout" ,CR ELSEIF right = 0 THEN DEBUG "Incorrect username of password, please try again!" ENDIF DEBUGIN DEC Options IF options = 1 THEN DEBUG "Please enter your new password" ,CR DEBUGIN DEC newpass IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR GOTO newpassprogram: ENDIF IF options = 2 THEN DEBUG "Good Bye!" ,CR PAUSE 200 DEBUG "You have succesfully logged out!" ,CR GOTO top ENDIF newpassprogram: DEBUG "Please enter your user number" DEBUGIN DEC Username DEBUG "please enter your password" DEBUGIN DEC Password IF username = 12345 AND 0>password<1000 THEN Right = 1 ELSEIF username <> 12345 OR password <> 24680 THEN Right = 0 ENDIF IF right = 1 THEN DEBUG "Authorization Granted! " ,CR DEBUG "Please Select an option:" ,CR DEBUG "Select 1 to change your password" ,CR DEBUG "Select 2 to logout" ,CR ELSEIF right = 0 THEN DEBUG "Incorrect username of password, please try again!" ENDIF DEBUGIN DEC Options IF options = 1 THEN DEBUG "Please enter your new password" ,CR DEBUGIN DEC newpass IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR GOTO newpassprogram: ENDIF IF options = 2 THEN DEBUG "Good Bye!" ,CR PAUSE 200 DEBUG "You have succesfully logged out!" ,CR GOTO top: ENDIF
Deathcrow said:Pro said:This reminds me of Basic Stamp Editor...we used it to code controls for systems and robots (boe-bots technically).
This is a simple password debug terminal I coded in bs2 (BSE)
Code:' {$STAMP BS2} ' {$PBASIC 2.5} 'Security Code Project 'Username: 12345 'Password: 24680 Username VAR Word Password VAR Word Right VAR Word Options VAR Byte newpass VAR Word password = 24680 Logout VAR Byte top: DEBUG "Please enter your user number" DEBUGIN DEC Username DEBUG "please enter your password" DEBUGIN DEC Password IF username = 12345 AND password = 24680 THEN Right = 1 ELSEIF username <> 12345 OR password <> 24680 THEN Right = 0 ENDIF IF right = 1 THEN DEBUG "Authorization Granted! " ,CR DEBUG "Please Select an option:" ,CR DEBUG "Select 1 to change your password" ,CR DEBUG "Select 2 to logout" ,CR ELSEIF right = 0 THEN DEBUG "Incorrect username of password, please try again!" ENDIF DEBUGIN DEC Options IF options = 1 THEN DEBUG "Please enter your new password" ,CR DEBUGIN DEC newpass IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR GOTO newpassprogram: ENDIF IF options = 2 THEN DEBUG "Good Bye!" ,CR PAUSE 200 DEBUG "You have succesfully logged out!" ,CR GOTO top ENDIF newpassprogram: DEBUG "Please enter your user number" DEBUGIN DEC Username DEBUG "please enter your password" DEBUGIN DEC Password IF username = 12345 AND 0>password<1000 THEN Right = 1 ELSEIF username <> 12345 OR password <> 24680 THEN Right = 0 ENDIF IF right = 1 THEN DEBUG "Authorization Granted! " ,CR DEBUG "Please Select an option:" ,CR DEBUG "Select 1 to change your password" ,CR DEBUG "Select 2 to logout" ,CR ELSEIF right = 0 THEN DEBUG "Incorrect username of password, please try again!" ENDIF DEBUGIN DEC Options IF options = 1 THEN DEBUG "Please enter your new password" ,CR DEBUGIN DEC newpass IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR GOTO newpassprogram: ENDIF IF options = 2 THEN DEBUG "Good Bye!" ,CR PAUSE 200 DEBUG "You have succesfully logged out!" ,CR GOTO top: ENDIF
Hah, I did boe bots in my introduction to engineering class my first year with basic stamp. We programmed it to go through many different tracks. One was to simply follow a black line around a track. One was dead reckoning, where you simply program it to go through the track, no sensors. Another was with "whiskers" or antennas, where if it hit a wall with one wire it would do something, and if it hit a wall with another it would do something, and if both wires hit a wall at the same time it would do something. The track had tons of zig-zags. =p
Pro said:Deathcrow said:Pro said:This reminds me of Basic Stamp Editor...we used it to code controls for systems and robots (boe-bots technically).
This is a simple password debug terminal I coded in bs2 (BSE)
Code:' {$STAMP BS2} ' {$PBASIC 2.5} 'Security Code Project 'Username: 12345 'Password: 24680 Username VAR Word Password VAR Word Right VAR Word Options VAR Byte newpass VAR Word password = 24680 Logout VAR Byte top: DEBUG "Please enter your user number" DEBUGIN DEC Username DEBUG "please enter your password" DEBUGIN DEC Password IF username = 12345 AND password = 24680 THEN Right = 1 ELSEIF username <> 12345 OR password <> 24680 THEN Right = 0 ENDIF IF right = 1 THEN DEBUG "Authorization Granted! " ,CR DEBUG "Please Select an option:" ,CR DEBUG "Select 1 to change your password" ,CR DEBUG "Select 2 to logout" ,CR ELSEIF right = 0 THEN DEBUG "Incorrect username of password, please try again!" ENDIF DEBUGIN DEC Options IF options = 1 THEN DEBUG "Please enter your new password" ,CR DEBUGIN DEC newpass IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR GOTO newpassprogram: ENDIF IF options = 2 THEN DEBUG "Good Bye!" ,CR PAUSE 200 DEBUG "You have succesfully logged out!" ,CR GOTO top ENDIF newpassprogram: DEBUG "Please enter your user number" DEBUGIN DEC Username DEBUG "please enter your password" DEBUGIN DEC Password IF username = 12345 AND 0>password<1000 THEN Right = 1 ELSEIF username <> 12345 OR password <> 24680 THEN Right = 0 ENDIF IF right = 1 THEN DEBUG "Authorization Granted! " ,CR DEBUG "Please Select an option:" ,CR DEBUG "Select 1 to change your password" ,CR DEBUG "Select 2 to logout" ,CR ELSEIF right = 0 THEN DEBUG "Incorrect username of password, please try again!" ENDIF DEBUGIN DEC Options IF options = 1 THEN DEBUG "Please enter your new password" ,CR DEBUGIN DEC newpass IF newpass = 0<newpass>100 THEN DEBUG "your Password has been changed, Restarting now" ,CR GOTO newpassprogram: ENDIF IF options = 2 THEN DEBUG "Good Bye!" ,CR PAUSE 200 DEBUG "You have succesfully logged out!" ,CR GOTO top: ENDIF
Hah, I did boe bots in my introduction to engineering class my first year with basic stamp. We programmed it to go through many different tracks. One was to simply follow a black line around a track. One was dead reckoning, where you simply program it to go through the track, no sensors. Another was with "whiskers" or antennas, where if it hit a wall with one wire it would do something, and if it hit a wall with another it would do something, and if both wires hit a wall at the same time it would do something. The track had tons of zig-zags. =p
Haha yes! I've done all of those...the funnest was the sumo bots (battle bots). Fucking so much fun to tweak.
euanity said:wow. Someone who is along with my field.
I haven't used mathlab before. But I have used MiniTab.
Is it better for engineers??
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?