commit
17da0a4528
1 changed files with 10 additions and 0 deletions
10
4/AWerbrouck.basic
Normal file
10
4/AWerbrouck.basic
Normal file
|
@ -0,0 +1,10 @@
|
|||
CLS
|
||||
Dim s As String
|
||||
INPUT "Z voor zeus en C voor corona, en niets als je houdt van dodona";s
|
||||
IF s = "Z" THEN
|
||||
PRINT ":D"
|
||||
ELSEIF s = "C" THEN
|
||||
PRINT "D:"
|
||||
ELSE
|
||||
PRINT "(-_-)"
|
||||
END IF
|
Loading…
Reference in a new issue