1250 "Determines if the box should be visible or not. |
1250 "Determines if the box should be visible or not. |
1251 Return a holder providing true or false" |
1251 Return a holder providing true or false" |
1252 |
1252 |
1253 arg1BoxVisible isNil ifTrue:[ |
1253 arg1BoxVisible isNil ifTrue:[ |
1254 arg1BoxVisible := BlockValue |
1254 arg1BoxVisible := BlockValue |
1255 with:[:vh | vh value >= 2 ] |
1255 with:[:vh | vh >= 2 ] |
1256 argument:(self argCountHolder) |
1256 argument:(self argCountHolder) |
1257 ]. |
1257 ]. |
1258 ^ arg1BoxVisible. |
1258 ^ arg1BoxVisible. |
|
1259 |
|
1260 "Modified: / 17-05-2019 / 16:16:59 / Stefan Vogel" |
1259 ! |
1261 ! |
1260 |
1262 |
1261 arg2BoxVisible |
1263 arg2BoxVisible |
1262 "Determines if the box should be visible or not. |
1264 "Determines if the box should be visible or not. |
1263 Return a holder providing true or false" |
1265 Return a holder providing true or false" |
1264 |
1266 |
1265 arg2BoxVisible isNil ifTrue:[ |
1267 arg2BoxVisible isNil ifTrue:[ |
1266 arg2BoxVisible := BlockValue |
1268 arg2BoxVisible := BlockValue |
1267 with:[:vh | vh value >= 3 ] |
1269 with:[:vh | vh >= 3 ] |
1268 argument:(self argCountHolder) |
1270 argument:(self argCountHolder) |
1269 ]. |
1271 ]. |
1270 ^ arg2BoxVisible. |
1272 ^ arg2BoxVisible. |
|
1273 |
|
1274 "Modified: / 17-05-2019 / 16:16:54 / Stefan Vogel" |
1271 ! |
1275 ! |
1272 |
1276 |
1273 arg3BoxVisible |
1277 arg3BoxVisible |
1274 "Determines if the box should be visible or not. |
1278 "Determines if the box should be visible or not. |
1275 Return a holder providing true or false" |
1279 Return a holder providing true or false" |
1276 |
1280 |
1277 arg3BoxVisible isNil ifTrue:[ |
1281 arg3BoxVisible isNil ifTrue:[ |
1278 arg3BoxVisible := BlockValue |
1282 arg3BoxVisible := BlockValue |
1279 with:[:vh | vh value >= 4 ] |
1283 with:[:vh | vh >= 4 ] |
1280 argument:(self argCountHolder) |
1284 argument:(self argCountHolder) |
1281 ]. |
1285 ]. |
1282 ^ arg3BoxVisible. |
1286 ^ arg3BoxVisible. |
|
1287 |
|
1288 "Modified: / 17-05-2019 / 16:16:48 / Stefan Vogel" |
1283 ! |
1289 ! |
1284 |
1290 |
1285 arg4BoxVisible |
1291 arg4BoxVisible |
1286 "Determines if the box should be visible or not. |
1292 "Determines if the box should be visible or not. |
1287 Return a holder providing true or false" |
1293 Return a holder providing true or false" |
1288 |
1294 |
1289 arg4BoxVisible isNil ifTrue:[ |
1295 arg4BoxVisible isNil ifTrue:[ |
1290 arg4BoxVisible := BlockValue |
1296 arg4BoxVisible := BlockValue |
1291 with:[:vh | vh value >= 5 ] |
1297 with:[:vh | vh >= 5 ] |
1292 argument:(self argCountHolder) |
1298 argument:(self argCountHolder) |
1293 ]. |
1299 ]. |
1294 ^ arg4BoxVisible. |
1300 ^ arg4BoxVisible. |
|
1301 |
|
1302 "Modified: / 17-05-2019 / 16:16:43 / Stefan Vogel" |
1295 ! |
1303 ! |
1296 |
1304 |
1297 argCountHolder |
1305 argCountHolder |
1298 "Return an argCounterHolder which is initialized at 2." |
1306 "Return an argCounterHolder which is initialized at 2." |
1299 |
1307 |