# des newdes
for my $key ('s', 'S') {
+ edit('sect', '6:8,4', $key, '+');
edit('sect', '6,4', $key, '+');
- edit('sect', '6,4', $key, '+');
- edit('sect', '8,4', $key, '+');
edit('sect', '8,4', $key, ',');
}
# interactive edit
iedit('sect', '3,5', 'm 2', 'a 1');
iedit('sect', '5,5', ' ');
+iedit('sect', '7:9,5', 'e 1', '', 'e 2');
# give
give('2,6', 'l', $INT_MIN);
# special case: move carrier's cargo away
edit('plane', 4, 'l', '5,1');
+# special case: load teleports to carrier
+edit('land', 4, 'S', 2);
+
# interactive edit
iedit('ship', 0, 'M 2', 'm 1', 'f 1');
iedit('ship', 0, 'R n', 'R ""');