Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  All
Print Page as PDF
Routine: LUNAR2

Package: Uncategorized

Routine: LUNAR2


Information

LUNAR2 ;PROGRAM MOON

Source Information

Source file <LUNAR2.m>

Entry Points

Name Comments DBIA/ICR reference
517
900 ;ON THE ROCKS
600 ;DISPLAY BACKGROUND
300 ;DESCENT STAGE
700 ;DISPLAY LUNAR MODULE
315
321
327
720
325
371 ;OUT OF FUEL
100 ;MAIN DRIVER
725
515
513
500 ;ILLEGAL BURN
521

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7
  • Line Location: 100+1
Function Call: WRITE
  • Prompt: "ATTENTION APOLLO!",!
  • Line Location: 100+2
Function Call: WRITE
  • Prompt: "FAILURE IN MAIN COMPUTER DESCENT MODULE...",!
  • Line Location: 100+3
Function Call: WRITE
  • Prompt: "MODULE WILL HAVE TO BE LANDED UNDER MANUAL CONTROL",!
  • Line Location: 100+4
Function Call: WRITE
  • Prompt: "YOU MAY ADJUST THE RATE OF BURN BETWEEN 0 AND 100 kg/s",!
  • Line Location: 100+5
Function Call: WRITE
  • Prompt: *7
  • Line Location: 100+6
Function Call: READ
  • Prompt: "DO YOU WANT TO TRY AGAIN?"
  • Formatting: !
  • Timeout: A="Y"
  • Variable: A S PA=0 S
  • Line Location: 100+7
Function Call: WRITE
  • Prompt: *7
  • Line Location: 300+1
Function Call: WRITE
  • Prompt: "TIME(s) HEIGHT(m) VELOCITY(m/s) FUEL(kg) BURN(kg/s) "
  • Line Location: 300+3
Function Call: READ
  • Prompt: B
  • Formatting: "?"
  • Timeout: (B>100)!(B<0)
  • Variable: " " D
  • Line Location: 315+0
Function Call: WRITE
  • Prompt: !,?2,T,?8,H,?21,V,?36,F,?50
  • Line Location: 315+0
Function Call: WRITE
  • Prompt: *7,!!,"TOUCHDOWN AT ",T+K," seconds",!,"LANDING VELOCITY ",V,"m/s",!
  • Line Location: 321+0
Function Call: WRITE
  • Prompt: *7,"CONGRATULATIONS ON A SAFE LANDING !",!
  • Line Location: 321+1
Function Call: WRITE
  • Prompt: *7,"WOULD YOU PLEASE CLEAN BUZZ ALDRIN OFF THE WALLS!",!
  • Line Location: 325+0
Function Call: WRITE
  • Prompt: *7,*7,"YOU HAVE ACHEIVED IMMORTALITY - THEY ARE GOING TO NAME THE CRATER AFTER YOU !",*7,!
  • Line Location: 327+0
Function Call: WRITE
  • Prompt: !,*7,"ZERO BURN ASSUMED"
  • Line Location: 500+1
Function Call: WRITE
  • Prompt: !,*7,"JET TUBES OVERHEATING - REDUCE BURN",*7,!
  • Line Location: 513+0
Function Call: WRITE
  • Prompt: !
  • Line Location: 521+1
Function Call: WRITE
  • Prompt: !
  • Line Location: 600+2
Function Call: WRITE
  • Prompt: ?22," ^",?53,"/\",!
  • Line Location: 600+3
Function Call: WRITE
  • Prompt: ?22,"/ \/\",?52,"/ \",!
  • Line Location: 600+4
Function Call: WRITE
  • Prompt: ?7,"/\",?21,"/ \",?51,"/ \",!
  • Line Location: 600+5
Function Call: WRITE
  • Prompt: ?6,"/ \/\",?20,"/ \",?47,"/\ / \",!
  • Line Location: 600+6
Function Call: WRITE
  • Prompt: "_o___/ \___o_/\/ \________________/ \ \____________________"
  • Line Location: 600+7
Function Call: WRITE
  • Prompt: " "
  • Line Location: 700+2
Function Call: WRITE
  • Prompt: " "
  • Line Location: 700+2
Function Call: WRITE
  • Prompt: " "
  • Line Location: 700+2
Function Call: WRITE
  • Prompt: "_"
  • Line Location: 720+0
Function Call: WRITE
  • Prompt: "(#)"
  • Line Location: 720+0
Function Call: WRITE
  • Prompt: "(#)"
  • Line Location: 720+0
Function Call: WRITE
  • Prompt: !
  • Line Location: 725+0
Function Call: WRITE
  • Prompt: "\M/"
  • Line Location: 900+1
Function Call: WRITE
  • Prompt: "<@>"
  • Line Location: 900+2
Function Call: WRITE
  • Prompt: "/W\"
  • Line Location: 900+3
Function Call: WRITE
  • Prompt: " "
  • Line Location: 900+4
Function Call: WRITE
  • Prompt: !
  • Line Location: 900+5
Function Call: WRITE
  • Prompt: " "
  • Line Location: 900+5
Function Call: WRITE
  • Prompt: !!,*7,"CRASH LANDING ON MOON...NO SURVIVORS",*7,!!
  • Line Location: 900+6
Info |  Source |  Entry Points |  Interaction Calls |  All