Elevator simulation: Difference between revisions
→{{header|Ring}}
No edit summary |
|||
Line 23:
nFloor = 0
count = 0
flag = 0
targetFloor = 0
floor = list(floorCount)
Line 182 ⟶ 183:
func pBegin()
flag = 0
count = 0
for n = 1 to floorCount
Line 219 ⟶ 221:
func pMove(sourceFloor)
if flag = 1
n = 0
//see "sourceFloor = " + sourceFloor + nl
pClose()
app.processEvents()
Line 276 ⟶ 280:
ok
randOld = sourceFloor
ok
func pMoveDown
for n = 1 to floorCount
floorCall[n] { setenabled(True) }
Line 300 ⟶ 305:
ok
next
ok
app.processEvents()
sleep(1)
flag++
func pMoveUp()
Line 326 ⟶ 334:
next
ok
app.processEvents()
sleep(1)
flag++
func pClose()
Line 334 ⟶ 345:
win.close()
app.quit()
</lang>
| |||