#ALIAS travel {firstcoord=0;secondcoord=0;thirdcoord=0;#prompt from {Where are you?};#prompt to {Where are you going?};#IF (%copy( @from, 1, 1)>%copy( @to, 1, 1)) {firstcoord=%eval( 10-( %copy( @from, 1, 1)-%copy( @to, 1, 1)))};#IF (%copy( @from, 2, 1)>%copy( @to, 2, 1)) {secondcoord=%eval( 10-( %copy( @from, 2, 1)-%copy( @to, 2, 1)))};#IF (%copy( @from, 3, 1)>%copy( @to, 3, 1)) {thirdcoord=%abs( %eval( %copy( @from, 3, 1)-%copy( @to, 3, 1)))};#IF (%copy( @from, 1, 1)<%copy( @to, 1, 1)) {firstcoord=%abs( %eval( %copy( @from, 1, 1)-%copy( @to, 1, 1)))};#IF (%copy( @from, 2, 1)<%copy( @to, 2, 1)) {secondcoord=%abs( %eval( %copy( @from, 2, 1)-%copy( @to, 2, 1)))};#IF (%copy( @from, 3, 1)<%copy( @to, 3, 1)) {thirdcoord=%eval( 10-(%abs( %eval( %copy( @from, 3, 1)-%copy( @to, 3, 1)))))};#repeat (@firstcoord) {east};#repeat (@secondcoord) {south};#repeat (@thirdcoord) {up}}